Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1406 1738 (N44W53 L=236)   895    104        4 (1354/1710-1450/1765) -39.8 W48-W58 N41-N46
      2  893 1637 (N48W02 L=185)  1865    414        7 ( 704/1577-1084/1680) -22.8 E16-W15 N40-N53
      3 1438 1594 (N33W44 L=227)  1900    370        5 (1300/1547-1620/1625) -17.1 W30-W57 N26-N36
      4 1552 1392 (N19W43 L=226)   746    204        2 (1515/1327-1606/1491)  78.7 W41-W46 N14-N24
      5  863 1461 (N36E04 L=179)   382    110        1 ( 819/1443- 925/1477) -15.9 E07-W00 N34-N37
      6  666 1259 (N26E20 L=163)   270     87        0 ( 621/1248- 713/1272) -15.9 E23-E16 N24-N26
      7  204 1060 (N17E62 L=121)  2642    299        7 ( 144/ 914- 251/1158) -56.3 E71-E55 N08-N23
      8  952 1071 (N10E04 L=179)   460    156        0 ( 901/1024-1025/1106)  20.6 E07-W01 N08-N11
      9 1110 1071 (N08W06 L=189)   192     60        0 (1083/1047-1134/1095)  36.9 W03-W07 N06-N09
     10  727 1035 (N11E18 L=165)   735    274        2 ( 650/ 991- 841/1083)  -9.5 E22-E10 N08-N14
     11 1627  892 (S12W37 L=220)  1320    279        5 (1533/ 782-1685/ 996)  39.8 W28-W42 S16-S06
     12  470  951 (N09E37 L=146)   235     52        2 ( 439/ 934- 499/ 970)  11.3 E39-E34 N08-N09
     13 1616  935 (S09W37 L=220)   242     65        0 (1605/ 902-1628/ 970)  76.0 W35-W37 S11-S06
     14  382  869 (N05E45 L=138)   506     92        2 ( 356/ 835- 415/ 919) -68.2 E46-E42 N02-N07
     15  917  819 (S04E09 L=174)  1206    487        5 ( 677/ 741-1077/ 875) -23.5 E23-W00 S10-N01
     16 1826  816 (S22W56 L=240)   552     81        0 (1791/ 788-1852/ 838)  15.9 W52-W60 S22-S20
     17 1640  732 (S22W37 L=220)  1208    200        4 (1576/ 670-1706/ 825)  41.2 W31-W43 S25-S17
     18  811  712 (S09E18 L=165)   917    242        6 ( 748/ 656- 887/ 788) -26.6 E21-E13 S12-S04
     19 1843  741 (S27W61 L=244)   754    108        2 (1819/ 694-1871/ 786)  33.7 W57-W64 S30-S24
     20  292  684 (S06E58 L=125)   442     95        1 ( 264/ 645- 311/ 720) -90.0 E60-E56 S08-S03
     21  224  628 (S10E71 L=112)  2081    157        2 ( 197/ 568- 253/ 708)  39.8 E86-E66 S14-S04
     22  323  513 (S18E64 L=119)   933    120        2 ( 299/ 450- 347/ 558)  45.0 E68-E60 S22-S14
     23 1071  461 (S30E06 L=177)   695    143        4 (1020/ 396-1119/ 509)  33.7 E11-E02 S34-S26
     24  711  440 (S26E32 L=151)   311    121        2 ( 675/ 405- 759/ 486) -63.4 E33-E29 S28-S22
     25 1025  165 (S57E24 L=159)   553     71        2 ( 987/ 153-1057/ 180)  -6.3 E28-E19 S59-S54
  

    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