Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1748 1553 (N19W67 L=186)  1255    164        0 (1673/1498-1805/1595) -35.0 W60-W73 N15-N23
      2  522 1390 (N31E28 L= 92)  1137    226        1 ( 469/1294- 593/1483)  45.0 E31-E21 N25-N36
      3  874 1426 (N27E02 L=117)   533    146        0 ( 824/1353- 929/1479) -68.2 E05-W00 N21-N31
      4 1241 1434 (N21W21 L=140)  1461    397        1 (1047/1385-1402/1473) -16.9 W08-W31 N18-N25
      5  288 1301 (N29E49 L= 71)  1573    229        3 ( 187/1254- 410/1340) -17.1 E62-E36 N24-N33
      6  847 1187 (N13E08 L=112)   844    321        0 ( 757/1095- 904/1317)  47.7 E14-E03 N08-N20
      7 1547 1250 (N05W36 L=155)   255     60        1 (1525/1230-1573/1276) -63.4 W34-W37 N03-N07
      8 1563 1104 (S03W34 L=153)   469    143        0 (1544/1035-1580/1172)  56.3 W31-W35 S06-N00
      9 1785 1017 (S12W50 L=170)  1701    335        5 (1716/ 894-1859/1161)  39.1 W43-W60 S18-S04
     10  556 1120 (N14E27 L= 93)   254     35        1 ( 537/1097- 581/1145) -56.3 E28-E25 N12-N15
     11 1711 1086 (S07W45 L=164)   276     81        0 (1695/1056-1730/1130)  63.4 W43-W46 S08-S04
     12 1852  995 (S15W57 L=177)   904    125        1 (1810/ 938-1880/1064)  36.9 W52-W61 S17-S10
     13 1930  939 (S19W68 L=188)   644     56        3 (1906/ 916-1952/ 963) -45.0 W64-W73 S21-S17
     14  468  909 (N03E36 L= 84)   353    108        0 ( 410/ 893- 525/ 925)  -6.3 E40-E31 N01-N03
     15 1172  837 (S12W06 L=125)   216     83        1 (1136/ 807-1205/ 870)  21.8 W03-W08 S13-S10
     16 1567  814 (S20W31 L=150)   220     37        0 (1551/ 786-1581/ 839)  71.6 W29-W32 S21-S18
     17  300  698 (S07E55 L= 65)  2638    400        6 ( 249/ 582- 359/ 838) -90.0 E62-E49 S14-N02
     18  373  804 (S02E45 L= 74)   300     60        1 ( 347/ 769- 398/ 826) -71.6 E46-E43 S03-N00
     19  160  776 (S00E68 L= 51)   929     88        1 ( 135/ 728- 196/ 808)  14.0 E74-E62 S02-N01
     20 1360  769 (S20W16 L=136)   243     78        1 (1326/ 748-1401/ 790)   0.0 W13-W19 S20-S18
     21  534  742 (S08E35 L= 85)   342     71        1 ( 507/ 700- 552/ 779)  68.2 E36-E32 S10-S05
     22  471  707 (S09E40 L= 79)   357    102        0 ( 433/ 682- 491/ 754)  63.4 E43-E38 S10-S06
     23 1497  683 (S27W25 L=144)   457    107        0 (1441/ 669-1556/ 697)  -6.3 W20-W29 S28-S25
     24  386  407 (S26E63 L= 56)  1083    156        1 ( 345/ 357- 441/ 476)  13.5 E77-E52 S28-S21
     25 1502  349 (S53W28 L=148)   479     64        1 (1470/ 325-1524/ 378)   0.0 W24-W31 S55-S50
     26 1299  274 (S55W06 L=126)  1051    161        2 (1225/ 245-1377/ 308)   7.6 E01-W14 S56-S52
  

    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