Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1629 1673 (N26W62 L=303)   573     33        1 (1608/1655-1652/1696)  21.8 W59-W64 N25-N27
      2 1620 1502 (N17W51 L=292)  1277    212        3 (1564/1461-1692/1534) -14.0 W45-W57 N14-N19
      3 1773 1461 (N11W64 L=305)  1319    331        1 (1714/1430-1830/1512)   2.9 W56-W76 N09-N12
      4 1150 1410 (N22W16 L=257)   974    263        0 (1021/1376-1288/1460) -28.1 W09-W24 N18-N27
      5 1739 1327 (N04W54 L=295)   331    101        1 (1708/1303-1767/1348)   8.1 W50-W57 N02-N05
      6  247 1268 (N32E51 L=190)   357     42        0 ( 226/1248- 274/1288)  14.0 E52-E48 N30-N33
      7  633 1204 (N20E20 L=221)  2016    663        4 ( 413/1168- 930/1238) -17.4 E36-E01 N13-N24
      8 1898 1096 (S13W64 L=305)  1155    198        1 (1861/1060-1943/1138)   9.5 W59-W72 S14-S11
      9  954 1055 (N05E03 L=237)   267     21        0 ( 935/1029- 976/1077)  18.4 E04-E01 N04-N06
     10  203  992 (N16E58 L=183)   679    146        1 ( 170/ 935- 236/1052) -60.3 E60-E55 N12-N19
     11 1864  861 (S26W56 L=297)  3096    311        4 (1798/ 765-1916/ 952)  48.0 W49-W62 S30-S20
     12 1372  936 (S10W18 L=259)   245     69        0 (1333/ 922-1410/ 948) -26.6 W16-W20 S11-S08
     13 1368  856 (S14W17 L=257)   291     28        0 (1346/ 831-1388/ 884)  71.6 W15-W18 S15-S12
     14 1148  849 (S10W03 L=244)   247     84        1 (1101/ 816-1183/ 871)  21.8 W00-W05 S11-S09
     15  645  753 (S06E28 L=213)   224     80        1 ( 622/ 716- 675/ 793)  38.7 E30-E25 S07-S03
     16 1277  762 (S18W10 L=250)   374    155        0 (1188/ 747-1345/ 788) -10.3 W03-W14 S19-S16
     17 1167  680 (S21W01 L=242)   207     61        0 (1134/ 664-1203/ 695) -33.7 W00-W03 S21-S19
     18  298  565 (S11E62 L=178)   405     75        2 ( 273/ 545- 328/ 589) -21.8 E65-E59 S11-S09
     19  251  524 (S12E72 L=169)  1890    120        1 ( 221/ 488- 287/ 563) -78.7 E76-E66 S14-S09
     20 1648  517 (S44W36 L=277)   494     62        1 (1624/ 491-1668/ 548) -78.7 W33-W38 S46-S41
     21  715  346 (S33E39 L=202)  1367    290        4 ( 658/ 265- 767/ 427)  27.9 E48-E31 S37-S27
     22 1466  384 (S50W19 L=260)  1167    147        3 (1406/ 351-1521/ 416)  -4.8 W12-W25 S53-S45
  

    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