Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1240 1893 (N59W41 L=199)   503     44        1 (1221/1868-1260/1917)  21.8 W35-W50 N56-N62
      2 1151 1886 (N60W28 L=186)   441     61        0 (1127/1859-1180/1907)  22.6 W23-W35 N56-N62
      3  583 1526 (N34E28 L=130)   313     67        0 ( 564/1491- 601/1561) -68.2 E30-E26 N31-N36
      4  876 1519 (N30E06 L=152)   272     95        0 ( 835/1488- 919/1547) -38.7 E08-E03 N27-N32
      5  356 1396 (N27E46 L=111)   746    147        3 ( 323/1333- 386/1476) -55.0 E51-E42 N22-N32
      6  649 1393 (N24E22 L=136)   535    107        0 ( 604/1355- 711/1431) -26.6 E25-E17 N21-N26
      7  238 1290 (N21E57 L=101)  1777    189        7 ( 178/1239- 290/1344) -36.0 E66-E51 N17-N25
      8 1389 1075 (S01W23 L=180)   518     99        0 (1359/1044-1431/1118) -26.6 W20-W25 S02-N01
      9 1874 1068 (S04W62 L=220)   396     27        0 (1852/1050-1890/1087)  14.0 W59-W64 S05-S03
     10 1871  973 (S10W62 L=220)   832    115        2 (1819/ 924-1907/1015)  -9.5 W55-W67 S13-S07
     11 1855  859 (S17W61 L=219)   486     70        1 (1835/ 826-1874/ 897)  90.0 W58-W64 S18-S14
     12 1789  855 (S17W53 L=211)   468     47        0 (1762/ 826-1816/ 881)  36.9 W50-W56 S18-S15
     13 1330  794 (S18W18 L=175)   339    120        2 (1279/ 757-1382/ 832)  23.2 W14-W21 S19-S15
     14  694  722 (S17E23 L=134)   236     70        0 ( 674/ 698- 729/ 741)  14.0 E24-E20 S18-S15
     15 1321  659 (S26W17 L=175)   950    424        0 (1185/ 533-1496/ 738)  26.6 W07-W29 S33-S22
     16  266  701 (S15E59 L= 99)   444     67        0 ( 243/ 673- 296/ 723)   8.1 E62-E55 S16-S13
     17 1716  653 (S29W50 L=208)   420     87        1 (1688/ 618-1750/ 674) -14.0 W46-W54 S31-S27
     18 1747  617 (S32W55 L=213)   355     67        0 (1707/ 604-1779/ 635)   7.1 W50-W58 S32-S30
     19  355  552 (S25E56 L=102)   619     91        1 ( 326/ 515- 394/ 596) -90.0 E57-E52 S27-S21
     20  740  548 (S29E24 L=134)   366     80        0 ( 703/ 526- 787/ 565)   0.0 E26-E20 S29-S27
     21 1006  416 (S40E07 L=150)  1901    409        2 ( 851/ 364-1157/ 492) -15.9 E17-W04 S44-S33
     22 1388  247 (S60W33 L=191)  1203    139        1 (1334/ 223-1451/ 285)  -9.0 W24-W45 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