Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1686 1410 (N07W53 L=223)  1106    110        3 (1641/1368-1731/1456) -56.3 W49-W57 N04-N10
      2 1031 1299 (N19W08 L=177)  1166    478        2 ( 890/1150-1195/1385)  12.8 E03-W19 N14-N22
      3 1794 1214 (S06W55 L=224)   445     85        0 (1761/1187-1833/1239) -38.7 W51-W57 S08-S04
      4 1877 1167 (S11W62 L=232)   945     88        4 (1847/1127-1913/1209)  78.7 W58-W67 S13-S08
      5  419 1131 (N25E35 L=134)   646    158        0 ( 378/1065- 484/1177)  16.7 E39-E29 N21-N27
      6 1394 1115 (S00W23 L=193)   628    139        3 (1355/1045-1423/1164) -90.0 W21-W24 S04-N03
      7 1634 1109 (S07W38 L=208)   232     38        1 (1609/1088-1655/1125) -33.7 W36-W39 S08-S05
      8 1550 1057 (S07W31 L=201)   612    178        3 (1495/1014-1617/1122) -53.1 W27-W35 S10-S02
      9 1837  855 (S28W52 L=222)  4496    583        2 (1686/ 620-1936/1082)  35.0 W35-W68 S39-S17
     10  260  937 (N17E53 L=117)  1181    252        3 ( 228/ 820- 298/1071) -90.0 E55-E50 N10-N25
     11 1564  946 (S14W29 L=199)   928    259        2 (1491/ 862-1646/1034)  26.6 W23-W36 S16-S10
     12 1291  877 (S10W11 L=181)   679    326        2 (1252/ 736-1339/1010)  72.6 W07-W13 S18-S02
     13  311  915 (N15E48 L=121)   894     25        0 ( 276/ 846- 354/ 996)  45.0 E52-E43 N10-N18
     14  120  939 (N19E72 L= 98)   648     92        0 (  99/ 914- 162/ 974) -21.8 E75-E64 N17-N21
     15 1574  856 (S19W28 L=198)   358     98        0 (1538/ 825-1607/ 899)  18.4 W25-W31 S21-S17
     16  776  801 (S02E19 L=150)  1150    291        2 ( 673/ 697- 849/ 893) -72.9 E23-E16 S08-N05
     17  664  498 (S17E36 L=133)  1732    418        3 ( 534/ 377- 794/ 635)  19.7 E51-E23 S21-S11
     18  423  599 (S06E49 L=121)   847    203        2 ( 329/ 575- 519/ 629)  -6.7 E57-E40 S08-S02
     19  364  488 (S11E61 L=109)  4228    356       14 ( 269/ 367- 454/ 620)  71.6 E70-E52 S19-S01
     20 1679  585 (S41W35 L=204)   699     98        2 (1624/ 563-1727/ 609) -28.6 W29-W40 S43-S36
     21 1008  502 (S25E15 L=154)  1326    296        2 ( 886/ 435-1137/ 580)   6.0 E24-E05 S26-S22
     22 1668  530 (S44W34 L=204)   482     57        1 (1651/ 495-1688/ 560) -63.4 W31-W36 S47-S41
     23  752  352 (S28E38 L=132)   430     95        1 ( 710/ 325- 791/ 389)  12.5 E42-E33 S29-S26
  

    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