Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1420 1716 (N48W45 L=186)   523     59        0 (1384/1702-1457/1730) -14.0 W41-W50 N46-N49
      2 1651 1540 (N32W57 L=197)   412     48        1 (1621/1522-1681/1558) -21.8 W53-W61 N31-N33
      3  732 1423 (N31E19 L=121)   688    175        2 ( 687/1349- 764/1496) -61.4 E23-E16 N25-N36
      4  269 1349 (N26E60 L= 80)  1317    186        4 ( 228/1266- 307/1424) -79.7 E64-E56 N20-N31
      5 1086 1318 (N22W06 L=146)   897    275        3 (1015/1230-1177/1358)   5.2 W00-W11 N17-N24
      6  162 1311 (N23E77 L= 63)   897     93        0 ( 147/1266- 183/1354)  90.0 E80-E74 N20-N25
      7  664 1294 (N22E23 L=117)   243     75        0 ( 627/1273- 698/1315)  21.8 E25-E20 N21-N23
      8  288 1290 (N23E56 L= 84)   408     43        0 ( 265/1274- 313/1307)  21.8 E58-E52 N21-N23
      9  418 1236 (N19E42 L= 98)   252     59        0 ( 403/1205- 432/1275)  76.0 E42-E40 N17-N21
     10 1896  913 (S09W69 L=209)  3165    236        7 (1850/ 806-1954/ 989)  30.5 W62-W85 S15-S05
     11 1831  923 (S08W59 L=199)   423     49        0 (1816/ 890-1844/ 953) -63.4 W57-W60 S09-S05
     12 1726  897 (S08W48 L=188)   392     80        0 (1706/ 857-1743/ 936) -59.0 W46-W49 S10-S05
     13 1344  865 (S07W19 L=159)   474     96        1 (1317/ 816-1377/ 905) -90.0 W17-W21 S10-S04
     14 1394  817 (S10W22 L=163)   401    101        2 (1343/ 785-1429/ 854)  11.3 W19-W24 S12-S08
     15 1495  800 (S12W30 L=170)   368     84        2 (1458/ 768-1530/ 826)  21.8 W26-W32 S13-S10
     16  772  743 (S12E17 L=123)   427    147        0 ( 731/ 681- 814/ 799)  49.4 E20-E14 S15-S08
     17  352  753 (S11E49 L= 92)   478     63        3 ( 329/ 720- 383/ 785) -90.0 E50-E45 S12-S08
     18 1297  738 (S15W16 L=156)   440    207        0 (1197/ 707-1380/ 754)  -9.5 W09-W21 S17-S13
     19 1683  649 (S24W47 L=187)  1725    295        3 (1581/ 541-1762/ 733)  47.5 W39-W54 S30-S18
     20 1348  647 (S21W20 L=160)   307     71        0 (1314/ 622-1379/ 680)  36.9 W17-W21 S22-S19
     21 1426  628 (S23W25 L=165)   471     69        1 (1400/ 586-1456/ 658) -59.0 W23-W27 S25-S20
     22  467  556 (S24E44 L= 97)   767    117        2 ( 441/ 515- 502/ 600)  80.5 E47-E40 S26-S20
     23  620  492 (S29E33 L=108)   276     76        0 ( 602/ 451- 635/ 531)  80.5 E33-E31 S31-S25
     24 1581  456 (S37W43 L=184)   452    107        1 (1534/ 441-1631/ 475)   5.7 W38-W48 S38-S36
     25  397  442 (S32E58 L= 82)  1336    177        1 ( 315/ 426- 483/ 463)   4.2 E73-E46 S33-S30
     26 1259  378 (S41W15 L=155)   282     74        0 (1224/ 363-1295/ 398)  11.3 W12-W18 S41-S39
     27  737  274 (S47E33 L=107)   545     74        0 ( 698/ 252- 768/ 300)  16.7 E37-E27 S49-S44
     28 1392  253 (S55W35 L=175)   481     47        1 (1368/ 233-1416/ 280)  -7.1 W32-W40 S57-S51
  

    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