Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1020 1762 (N37E25 L=100)  1091    189        1 ( 960/1703-1118/1793)  67.4 E28-E19 N31-N43
      2  620 1707 (N23E48 L= 77)   334     54        1 ( 588/1685- 648/1726)  26.6 E49-E45 N21-N24
      3 1483 1496 (N34W15 L=141)   476     58        0 (1460/1460-1508/1529) -45.0 W13-W17 N31-N35
      4 1664 1310 (N28W32 L=158)   541    126        0 (1630/1256-1694/1363) -39.8 W28-W35 N25-N30
      5  941 1335 (N08E13 L=113)   583    151        3 ( 884/1308-1023/1361)  29.7 E16-E08 N06-N10
      6  465 1221 (S09E39 L= 87)   403    141        0 ( 426/1159- 493/1284)  82.9 E39-E37 S13-S05
      7  361 1180 (S14E46 L= 80)   279     97        3 ( 344/1137- 384/1211)  78.7 E47-E43 S16-S11
      8  883 1102 (S06E10 L=116)   548    144        0 ( 837/1050- 922/1172) -35.5 E13-E06 S08-S03
      9  620 1116 (S12E25 L=100)   349     81        2 ( 592/1086- 656/1152)  63.4 E26-E23 S13-S09
     10 1886 1065 (N21W58 L=184)   521     86        0 (1866/1023-1904/1106) -33.7 W55-W61 N19-N23
     11  855 1044 (S10E10 L=115)   339    165        2 ( 817/ 978- 880/1104) -60.3 E13-E07 S14-S07
     12 1808  958 (N12W52 L=177)   670    148        1 (1759/ 926-1856/ 985)  24.0 W47-W57 N09-N14
     13  924  916 (S15E03 L=123)   566    234        3 ( 869/ 875-1020/ 954)  14.0 E06-W02 S18-S11
     14 1035  891 (S14W04 L=129)   183     92        0 ( 991/ 880-1077/ 900)  21.8 W01-W06 S15-S12
     15 1782  864 (N07W52 L=178)   527     71        1 (1760/ 837-1814/ 899)  -9.5 W49-W55 N04-N08
     16 1830  813 (N06W59 L=184)  1040    132        3 (1793/ 759-1860/ 882) -81.9 W56-W62 N02-N09
     17 1123  805 (S16W11 L=137)   262    120        1 (1074/ 779-1175/ 820)  31.0 W08-W14 S18-S14
     18 1638  607 (S11W51 L=177)   434    105        2 (1612/ 560-1674/ 654) -81.9 W49-W52 S14-S07
     19 1066  571 (S31W16 L=142)   406     95        0 (1013/ 549-1117/ 601)  15.9 W12-W19 S31-S29
     20 1673  492 (S16W62 L=187)   864     76        3 (1631/ 461-1712/ 517)  23.2 W56-W66 S17-S13
     21 1409  388 (S30W48 L=174)   546     63        1 (1375/ 368-1441/ 420) -78.7 W46-W51 S32-S27
  

    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