Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1729 1454 (N16W62 L=153)  2553    247        6 (1662/1370-1808/1517)  41.6 W55-W75 N11-N20
      2 1544 1440 (N20W44 L=135)   589    106        2 (1514/1393-1578/1480)  29.7 W41-W49 N17-N22
      3  617 1399 (N37E22 L= 69)   264     76        1 ( 596/1362- 639/1439)  53.1 E23-E20 N34-N38
      4 1858 1243 (N01W67 L=157)   589     78        2 (1835/1207-1885/1272)   5.7 W62-W72 N00-N02
      5  288 1215 (N29E52 L= 38)   333     60        1 ( 265/1187- 307/1244)  56.3 E54-E50 N27-N30
      6  158 1142 (N25E70 L= 21)  1476    147        4 ( 117/1071- 189/1203) -25.2 E81-E63 N20-N28
      7 1841 1109 (S06W60 L=150)   582     79        4 (1816/1079-1876/1144) -63.4 W56-W64 S07-S03
      8 1860  937 (S17W60 L=150)  1996    266        3 (1798/ 844-1941/1052)  16.9 W51-W75 S21-S11
      9 1769 1003 (S10W50 L=141)   311     86        0 (1746/ 965-1782/1046)  53.1 W47-W51 S11-S07
     10 1207  885 (S05W08 L= 99)   471    217        0 (1156/ 826-1275/ 984) -68.2 W06-W11 S09-N01
     11 1510  888 (S11W27 L=118)   273     79        0 (1487/ 852-1536/ 921) -68.2 W26-W28 S13-S08
     12  347  839 (N05E49 L= 42)   512    111        1 ( 305/ 803- 393/ 876)  24.0 E53-E44 N03-N07
     13 1676  855 (S17W40 L=131)   480     78        0 (1630/ 828-1710/ 874) -33.7 W36-W42 S18-S14
     14 1130  800 (S08W02 L= 93)   233    106        1 (1106/ 754-1153/ 840)  68.2 W00-W04 S11-S06
     15 1280  767 (S13W11 L=102)   566    106        3 (1236/ 725-1314/ 814)  31.0 W08-W13 S16-S10
     16 1249  680 (S18W08 L= 98)   326    101        0 (1205/ 653-1307/ 710)   8.1 W04-W11 S19-S17
     17 1336  634 (S23W13 L=103)   452    156        0 (1311/ 565-1356/ 702)  66.0 W10-W14 S27-S18
     18  344  567 (S12E58 L= 33)  4941    346       14 ( 246/ 464- 462/ 678) -77.9 E72-E45 S19-S04
     19  391  620 (S09E51 L= 40)   396     66        2 ( 362/ 590- 414/ 644) -45.0 E53-E48 S10-S06
     20  707  549 (S17E29 L= 62)   413    129        0 ( 692/ 492- 729/ 613)  77.5 E30-E27 S21-S12
     21 1432  527 (S33W18 L=109)   769    125        2 (1370/ 505-1480/ 560)   6.3 W13-W22 S34-S30
     22  480  471 (S19E50 L= 41)   966    156        6 ( 453/ 403- 510/ 529)  48.4 E55-E45 S24-S15
     23 1001  449 (S29E13 L= 78)   480     91        0 ( 983/ 399-1022/ 497)  66.8 E15-E10 S32-S25
     24  716  346 (S32E37 L= 53)   476     78        1 ( 680/ 314- 749/ 379)  26.6 E41-E33 S33-S29
     25 1561  348 (S53W35 L=126)   651     69        2 (1526/ 321-1590/ 377)   0.0 W31-W40 S55-S49
     26  592  328 (S31E50 L= 41)  1166    103        1 ( 526/ 300- 679/ 349)   0.0 E58-E40 S33-S29
  

    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