Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  981 1807 (N60W26 L=209)   321     68        0 ( 951/1788-1013/1821)   5.7 W20-W30 N58-N60
      2 1380 1791 (N44W59 L=243)   564     60        1 (1350/1766-1411/1811)   4.8 W53-W65 N43-N45
      3 1201 1750 (N48W39 L=222)   446     60        1 (1170/1727-1237/1773) -45.0 W35-W41 N44-N49
      4  928 1639 (N47W09 L=193)  1903    349        6 ( 815/1553-1080/1705)   8.7 E01-W25 N43-N50
      5  776 1435 (N37E08 L=176)   353     67        1 ( 737/1416- 817/1451) -26.6 E10-E04 N35-N38
      6  971 1387 (N29W04 L=188)   651    122        0 ( 914/1358-1025/1424)   0.0 W00-W08 N27-N31
      7 1257 1240 (N15W18 L=202)  1167    382        1 (1128/1121-1364/1385) -70.7 W14-W22 N05-N25
      8  244 1268 (N34E58 L=126)   685    102        0 ( 221/1220- 267/1317)  63.4 E60-E56 N31-N37
      9  781 1048 (N13E14 L=170)   197     51        2 ( 760/1023- 809/1071) -56.3 E15-E12 N11-N14
     10  226  841 (N08E61 L=123)  3951    508        5 ( 157/ 663- 305/1054) -77.7 E69-E56 S02-N21
     11 1081  882 (S02W00 L=184)   390    101        1 (1060/ 830-1109/ 933)  51.3 E01-W03 S05-N00
     12 1855  847 (S24W57 L=241)  1507    140        4 (1816/ 791-1896/ 912) -56.3 W52-W65 S28-S19
     13  174  778 (N05E70 L=114)  4801    200        8 ( 125/ 693- 221/ 864)  68.2 E79-E62 N00-N10
     14 1330  718 (S17W12 L=196)   410    153        1 (1266/ 663-1369/ 769)  32.0 W07-W15 S19-S14
     15  470  693 (S03E42 L=142)   340     55        0 ( 441/ 664- 492/ 712) -76.0 E44-E40 S05-S01
     16 1518  570 (S32W24 L=207)   503     99        0 (1479/ 534-1558/ 606)  23.2 W20-W27 S33-S30
     17  893  476 (S24E20 L=164)  1009    228        1 ( 836/ 378- 943/ 580)  49.8 E26-E14 S30-S17
     18  545  456 (S19E45 L=138)  1880    270        9 ( 466/ 399- 642/ 541) -65.6 E52-E39 S24-S12
     19  377  485 (S15E60 L=124)  1153    114        1 ( 340/ 434- 411/ 524) -81.9 E64-E56 S19-S12
     20  373  423 (S20E66 L=118)  4536    269       14 ( 273/ 345- 465/ 523) -42.5 E75-E56 S26-S12
     21 1654  447 (S47W40 L=224)   621     81        0 (1621/ 430-1697/ 464) -18.4 W34-W46 S49-S44
     22  559  354 (S27E51 L=133)   606    116        2 ( 526/ 295- 594/ 389)  21.8 E60-E45 S31-S24
     23 1028  301 (S40E18 L=166)   438     56        0 ( 997/ 284-1063/ 320) -36.9 E20-E15 S41-S37
     24 1219  219 (S54E07 L=176)  1935    269        4 (1109/ 173-1338/ 269)   4.6 E20-W05 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