Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  965 1804 (N60W24 L=207)   389     98        1 ( 914/1783-1015/1822)  -4.4 W17-W30 N58-N61
      2 1382 1794 (N44W60 L=243)   539     59        0 (1354/1768-1413/1814)   5.2 W53-W66 N43-N45
      3 1204 1753 (N48W39 L=222)   437     54        1 (1173/1731-1239/1774) -36.9 W36-W42 N45-N49
      4 1050 1679 (N47W21 L=204)   536     84        0 (1018/1640-1089/1710)  20.6 W17-W26 N44-N48
      5  894 1629 (N48W06 L=189)  1228    196        3 ( 822/1562- 977/1674)  15.9 W00-W14 N44-N50
      6  780 1438 (N37E08 L=176)   372     80        1 ( 733/1415- 826/1454) -26.6 E11-E04 N34-N38
      7  985 1390 (N29W06 L=189)   645    150        1 ( 925/1349-1058/1432)   0.0 W01-W11 N26-N30
      8 1265 1244 (N15W19 L=202)  1086    297        1 (1170/1144-1350/1360) -72.6 W16-W21 N07-N23
      9  247 1267 (N34E58 L=126)   673     97        0 ( 225/1221- 266/1316)  63.4 E59-E55 N31-N37
     10  789 1062 (N14E13 L=170)   234     63        1 ( 769/1038- 815/1093) -76.0 E14-E11 N11-N15
     11  199  952 (N15E62 L=121)  1955    252        4 ( 159/ 829- 241/1056) -63.4 E67-E58 N07-N21
     12 1091  884 (S02W01 L=184)   372    109        0 (1070/ 832-1119/ 939)  59.0 W00-W03 S05-N00
     13 1859  851 (S23W58 L=241)  1371    134        2 (1823/ 794-1899/ 915) -56.3 W53-W65 S28-S19
     14  176  776 (N05E70 L=113)  4753    187        7 ( 125/ 691- 222/ 863)  73.3 E79-E62 N00-N10
     15 1353  737 (S17W14 L=197)   320     84        0 (1323/ 701-1378/ 772)  31.0 W11-W16 S18-S14
     16  271  702 (S00E60 L=123)   949    102        1 ( 238/ 676- 318/ 753) -38.7 E64-E55 S02-N02
     17  478  694 (S03E41 L=142)   331     52        1 ( 449/ 664- 497/ 719) -56.3 E43-E39 S05-S01
     18 1529  577 (S32W25 L=208)   502     71        0 (1496/ 544-1564/ 612)  18.4 W21-W27 S33-S30
     19  901  475 (S24E20 L=163)  1077    244        1 ( 844/ 365- 952/ 585)  49.4 E26-E13 S31-S17
     20  560  456 (S19E44 L=139)  1821    237        5 ( 482/ 399- 648/ 537) -65.6 E49-E38 S24-S13
     21  374  439 (S19E64 L=119)  5685    266       14 ( 274/ 348- 468/ 529) -35.5 E75-E55 S25-S12
     22 1657  448 (S47W40 L=223)   596     74        0 (1626/ 433-1701/ 466)  -5.7 W35-W47 S49-S44
     23  570  364 (S26E49 L=134)   448     57        1 ( 551/ 330- 595/ 391)  20.6 E53-E45 S28-S24
     24 1033  302 (S40E18 L=165)   461     45        0 (1003/ 284-1065/ 323) -36.9 E19-E15 S41-S37
     25 1221  219 (S54E07 L=176)  1877    234        4 (1114/ 174-1330/ 266)   5.0 E19-W04 S56-S50
  

    OPENR, u, binfile, /COMP, /GET_LUN
    head = FLTARR(6) ;[xsize,ysize,radius,hh,mm,ss]
    READU, u, head
    data = INTARR(FIX(head[0]),FIX(head[1]))
    READU, u, data
    FREE_LUN, u
    

• each filament has the value of Fil_ID
• all values are in pixel

  c = WHERE(data EQ Fil_ID, area)
  f = '(2(A,I6))'
  PRINT, FORM=f, "Area of Fil_ID", Fil_ID," =", area 

  data = ROTATE(data,7)
  Solar_y = 2048-Solar_y