Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  937 1846 (N45E32 L= 42)   406     46        0 ( 918/1823- 955/1869) -26.6 E35-E29 N43-N47
      2  522 1750 (N29E59 L= 14)   619     62        1 ( 496/1728- 559/1766)  -6.3 E64-E55 N27-N30
      3 1151 1620 (N32E06 L= 68)  1256    226        2 (1063/1548-1218/1714) -32.7 E14-W00 N28-N37
      4  683 1599 (N21E35 L= 39)   470     84        1 ( 648/1558- 717/1638) -35.5 E38-E31 N18-N23
      5 1497 1531 (N35W21 L= 94)  1262    189        2 (1449/1450-1545/1624) -57.5 W16-W25 N29-N41
      6  324 1313 (S02E52 L= 21)   298     55        0 ( 304/1288- 350/1339)  56.3 E53-E50 S03-N00
      7 1522 1067 (N06W29 L=102)  1166    392        1 (1496/ 918-1555/1270) -67.2 W23-W32 S02-N17
      8 1688 1239 (N21W38 L=112)   739    101        1 (1637/1206-1741/1265)   5.7 W33-W43 N18-N22
      9 1773 1162 (N19W47 L=120)   572     77        1 (1749/1130-1798/1193) -56.3 W44-W49 N16-N20
     10  215 1110 (S15E59 L= 15)   705     90        0 ( 200/1061- 233/1160)  81.9 E61-E57 S18-S11
     11 1661 1036 (N08W39 L=113)   276     71        0 (1638/1004-1692/1063)  -9.5 W36-W42 N07-N09
     12  152  934 (S26E68 L=  6)  1299    169        1 ( 122/ 868- 184/1008)  52.1 E73-E62 S30-S21
     13  304  680 (S41E51 L= 22)   703    153        0 ( 265/ 620- 365/ 724)  26.6 E59-E43 S45-S36
     14 1748  644 (S11W59 L=133)   354     65        0 (1716/ 618-1777/ 673)  53.1 W57-W61 S12-S08
     15 1692  635 (S13W55 L=128)   351     50        0 (1668/ 613-1711/ 662)  90.0 W52-W56 S14-S10
     16 1570  610 (S18W46 L=119)   511    111        1 (1543/ 578-1614/ 650)   9.5 W43-W49 S19-S15
     17 1759  586 (S13W64 L=138)   969     80        0 (1732/ 540-1783/ 631) -80.5 W61-W67 S16-S10
     18 1318  581 (S26W30 L=103)   456    142        0 (1263/ 528-1364/ 619) -16.7 W24-W34 S27-S23
     19 1710  457 (S21W70 L=143)  1572    141        3 (1651/ 418-1768/ 498)  28.6 W64-W79 S24-S18
     20 1234  450 (S36W30 L=104)   250     48        0 (1206/ 438-1268/ 464)  11.3 W27-W32 S36-S34
     21 1500  369 (S33W56 L=130)   996    152        1 (1430/ 337-1571/ 416)  53.1 W52-W59 S36-S28
  

    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