Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1644 1505 (N18W52 L=185)  1663    255        1 (1535/1450-1756/1567) -27.9 W45-W62 N13-N23
      2  368 1349 (N31E41 L= 92)  1275    265        1 ( 310/1263- 473/1446)  29.7 E46-E31 N25-N36
      3 1154 1382 (N19W14 L=147)   495     68        1 (1107/1354-1198/1405) -21.8 W11-W16 N17-N20
      4  947 1365 (N22W01 L=134)   661    198        0 ( 851/1325-1031/1400) -37.9 E04-W05 N18-N25
      5  685 1337 (N25E16 L=117)   494    149        0 ( 634/1285- 742/1398) -53.1 E18-E12 N20-N29
      6  186 1262 (N29E61 L= 72)  1732    193        2 ( 104/1217- 283/1304) -10.6 E80-E48 N24-N32
      7 1343 1199 (N06W21 L=155)   326     79        1 (1304/1164-1376/1235) -76.0 W19-W23 N03-N07
      8  637 1130 (N13E21 L=112)  1048    273        1 ( 550/1034- 693/1229)  39.3 E28-E16 N08-N18
      9 1593 1092 (S05W36 L=169)   378    109        1 (1566/1047-1619/1129)  78.7 W33-W38 S07-S02
     10 1362 1066 (S02W20 L=153)   248     62        2 (1345/1037-1380/1109)  56.3 W19-W21 S03-N00
     11  384  965 (N08E41 L= 92)   505    127        0 ( 369/ 913- 402/1047)  82.9 E42-E40 N04-N12
     12 1799  987 (S14W51 L=185)   310     44        0 (1772/ 971-1820/1010)  11.3 W48-W53 S15-S13
     13 1870  928 (S19W59 L=193)   788     82        1 (1842/ 893-1897/ 975)  38.7 W55-W63 S20-S16
     14 1801  921 (S18W51 L=185)   507     78        2 (1781/ 876-1822/ 956)  63.4 W49-W53 S20-S16
     15 1721  874 (S20W43 L=177)   352     95        1 (1695/ 833-1738/ 928)  59.0 W41-W45 S21-S16
     16  832  840 (S06E14 L=119)   317    125        0 ( 807/ 773- 860/ 901)  54.5 E16-E11 S10-S03
     17  310  857 (N03E49 L= 84)   332     50        2 ( 286/ 833- 338/ 880)   0.0 E51-E46 N01-N04
     18 1390  815 (S17W19 L=152)   438    125        0 (1355/ 756-1425/ 864)  39.8 W15-W21 S20-S14
     19  247  764 (S02E58 L= 75)   362     75        2 ( 214/ 745- 278/ 785) -18.4 E61-E54 S03-N00
     20  239  686 (S06E62 L= 71)  3550    446       13 ( 100/ 587- 407/ 780) -17.4 E82-E47 S11-N01
     21 1312  632 (S27W11 L=144)   372    148        0 (1247/ 618-1388/ 653) -12.5 W07-W16 S28-S25
     22 1393  307 (S54W16 L=149)   348     42        0 (1360/ 293-1418/ 320) -15.9 W12-W19 S55-S52
     23 1188  246 (S54E06 L=127)   824    139        2 (1130/ 208-1261/ 285)   8.7 E11-W02 S56-S52
  

    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