Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1252 1895 (N60W43 L=199)   561     47        1 (1232/1865-1274/1918)  26.6 W38-W52 N55-N62
      2  602 1532 (N34E27 L=130)   528    114        0 ( 583/1473- 627/1584) -69.4 E28-E24 N29-N37
      3  898 1522 (N30E05 L=152)   318    107        1 ( 849/1492- 945/1550) -33.7 E07-E01 N27-N32
      4  296 1492 (N34E57 L= 99)   493     60        0 ( 277/1464- 319/1515)  45.0 E60-E54 N32-N36
      5  373 1384 (N26E44 L=112)   765    165        4 ( 352/1307- 402/1457) -70.0 E47-E40 N20-N31
      6  673 1400 (N24E20 L=136)   548    125        0 ( 631/1361- 727/1444) -40.6 E23-E16 N21-N27
      7  177 1287 (N22E65 L= 91)   600     82        2 ( 153/1248- 198/1325)  63.4 E68-E62 N19-N23
      8  257 1286 (N21E54 L=102)   983    104        6 ( 215/1238- 301/1317)  38.7 E59-E49 N17-N22
      9  407 1227 (N15E39 L=117)   244     91        2 ( 374/1194- 445/1256)  26.6 E42-E36 N13-N17
     10 1418 1075 (S01W24 L=181)   522     75        2 (1381/1033-1456/1113) -36.9 W22-W26 S03-N01
     11 1832  933 (S12W57 L=213)  2325    393        7 (1767/ 817-1914/1029)  38.7 W50-W68 S19-S06
     12 1863  863 (S17W62 L=218)   513     86        2 (1837/ 824-1881/ 911)  90.0 W58-W64 S18-S13
     13 1355  799 (S17W19 L=175)   294     96        0 (1319/ 767-1403/ 834)  26.6 W16-W22 S19-S15
     14  292  771 (S11E53 L=103)   292     30        1 ( 275/ 748- 313/ 790) -71.6 E54-E51 S12-S09
     15  718  685 (S20E22 L=134)   530    154        2 ( 701/ 612- 746/ 758)  77.5 E24-E19 S24-S15
     16 1354  672 (S25W19 L=175)  1156    403        2 (1205/ 555-1523/ 742)  23.5 W08-W31 S32-S21
     17  279  705 (S15E57 L= 99)   387     48        0 ( 258/ 682- 311/ 724)   9.5 E59-E53 S15-S13
     18 1736  635 (S30W53 L=209)   979    145        2 (1698/ 598-1789/ 673) -14.0 W47-W59 S32-S27
     19  468  622 (S21E42 L=114)   339     57        3 ( 444/ 596- 491/ 654)  36.9 E44-E40 S23-S19
     20  365  556 (S25E55 L=102)   583     80        1 ( 338/ 517- 396/ 597) -71.6 E56-E52 S27-S21
     21  759  552 (S28E22 L=134)   395     80        0 ( 721/ 530- 808/ 572)   0.0 E25-E18 S29-S27
     22  930  426 (S39E13 L=143)   917    181        1 ( 871/ 366- 998/ 496) -57.5 E15-E08 S44-S33
     23 1089  414 (S41E01 L=155)  1078    195        2 ( 995/ 374-1167/ 464)   8.7 E08-W05 S43-S38
     24 1401  246 (S60W35 L=192)  1222    123        1 (1344/ 224-1464/ 281)  -9.9 W25-W48 S62-S55
  

    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