Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  762 1845 (N37E52 L=129)   543     63        1 ( 744/1816- 783/1881) -26.6 E58-E48 N34-N40
      2  839 1819 (N37E43 L=138)   606     44        0 ( 807/1797- 870/1843) -14.0 E47-E39 N35-N38
      3  791 1750 (N31E40 L=141)   534     57        1 ( 765/1719- 821/1773)  56.3 E43-E37 N28-N32
      4  954 1581 (N24E21 L=160)   450    161        0 ( 926/1504- 994/1650) -35.0 E25-E15 N20-N27
      5  554 1540 (N11E44 L=137)   381     55        0 ( 521/1514- 581/1561)  11.3 E46-E41 N09-N12
      6 1286 1468 (N27W02 L=183)   596    171        0 (1263/1394-1337/1518)  90.0 W00-W04 N21-N31
      7  491 1388 (N01E42 L=139)   727    159        1 ( 465/1310- 511/1459) -69.4 E45-E39 S03-N05
      8  224 1410 (S03E69 L=112)   810     42        1 ( 195/1387- 255/1431) -10.3 E75-E64 S03-S01
      9  252 1282 (S10E59 L=122)   865    164        3 ( 227/1220- 276/1354) -69.4 E64-E55 S13-S05
     10 1377 1200 (N14W15 L=196)   441    129        0 (1351/1128-1393/1260) -60.3 W12-W17 N09-N16
     11  257 1084 (S21E53 L=127)   790    173        3 ( 196/1022- 302/1131)  -8.7 E60-E47 S23-S18
     12  590 1014 (S18E25 L=156)  1186    294        0 ( 477/ 918- 688/1102)  53.7 E31-E20 S25-S10
     13 1834  902 (N12W57 L=238)  1000    193        2 (1813/ 809-1855/ 989) -63.4 W53-W61 N07-N17
     14 1766  865 (N08W51 L=232)   298     44        0 (1753/ 836-1776/ 896) -45.0 W49-W52 N06-N09
     15  847  800 (S23E04 L=177)  1464    366        2 ( 673/ 759-1012/ 848)  33.7 E13-W05 S29-S16
     16  441  715 (S39E31 L=149)   929    172        1 ( 362/ 687- 527/ 751)  21.8 E39-E24 S42-S35
     17 1531  646 (S11W42 L=222)   529    154        0 (1484/ 581-1573/ 715)  90.0 W40-W43 S15-S06
     18 1313  539 (S24W33 L=214)   485    153        0 (1249/ 513-1393/ 559)  49.4 W30-W37 S27-S20
     19 1712  481 (S13W67 L=248)  1370    130        5 (1675/ 431-1756/ 522)  71.6 W63-W74 S16-S10
     20 1245  437 (S32W34 L=215)   309     80        0 (1212/ 419-1288/ 465)  18.4 W31-W37 S32-S30
     21 1099  245 (S49W41 L=222)  2093    319        1 ( 964/ 176-1214/ 325)   0.0 W24-W59 S50-S46
  

    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