Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  614 1750 (N27E53 L=141)  3516    455        7 ( 479/1604- 743/1841) -81.9 E61-E41 N14-N36
      2 1037 1768 (N39E23 L=171)   663    147        0 ( 988/1708-1071/1818) -30.3 E30-E18 N35-N42
      3  459 1687 (N20E62 L=132)   611    111        4 ( 421/1660- 496/1719)  15.9 E67-E56 N18-N22
      4  882 1658 (N27E27 L=167)   419     80        2 ( 859/1618- 906/1699) -74.1 E29-E25 N23-N30
      5 1607 1489 (N38W27 L=221)   593    162        0 (1566/1415-1633/1552) -60.9 W22-W29 N32-N41
      6  279 1504 (N05E68 L=126)  1215    105        1 ( 222/1475- 316/1529)   8.7 E76-E62 N03-N07
      7 1311 1261 (N13W10 L=204)   338     66        3 (1290/1220-1330/1303) -63.4 W08-W11 N10-N16
      8  167 1174 (S16E68 L=126)  2111    172        8 ( 126/1086- 205/1240)  84.3 E75-E63 S21-S11
      9 1379 1219 (N13W15 L=209)   278     86        1 (1347/1190-1419/1236)   0.0 W13-W18 N11-N14
     10  328 1066 (S20E47 L=147)  1476    292        5 ( 267/ 969- 386/1167) -39.8 E53-E40 S25-S14
     11  237  932 (S30E56 L=138)   795    134        2 ( 204/ 860- 271/ 990)  56.3 E60-E51 S34-S25
     12  549  934 (S23E27 L=167)   264    116        0 ( 523/ 881- 562/ 988) -56.3 E29-E25 S26-S20
     13  140  925 (S31E71 L=123)   767     56        1 ( 118/ 894- 158/ 956)  33.7 E75-E66 S33-S29
     14 1290  909 (S07W18 L=212)   310     71        2 (1267/ 869-1325/ 940)  78.7 W15-W19 S09-S04
     15 1703  894 (N05W45 L=239)   330     63        1 (1677/ 860-1726/ 925) -21.8 W42-W48 N03-N05
     16  826  888 (S20E08 L=186)   276     77        1 ( 782/ 871- 861/ 907)  36.9 E10-E06 S20-S17
     17  259  803 (S37E54 L=140)   363     88        0 ( 228/ 772- 295/ 837) -23.2 E57-E49 S38-S35
     18 1497  723 (S11W36 L=230)   843    212        1 (1399/ 671-1586/ 766)  48.0 W32-W41 S16-S06
     19 1712  648 (S08W56 L=250)   359     76        1 (1681/ 633-1743/ 666)   8.1 W53-W60 S09-S06
     20 1659  609 (S12W54 L=248)   317     88        0 (1645/ 580-1681/ 649) -36.9 W51-W56 S12-S09
     21 1202  584 (S27W24 L=218)   478    146        0 (1132/ 558-1265/ 619)  40.6 W19-W26 S29-S23
     22 1446  439 (S27W48 L=242)  1562    307        1 (1303/ 398-1584/ 473)  16.3 W36-W62 S31-S23
     23 1101  396 (S41W27 L=221)  1145    207        5 ( 994/ 364-1193/ 428)  28.3 W19-W32 S44-S36
     24  514  379 (S64E29 L=165)  1315    130        1 ( 445/ 343- 576/ 415)  -2.6 E40-E18 S66-S60
  

    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