Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1213 1571 (N30E00 L= 71)   692    152        0 (1170/1519-1280/1622) -32.0 E03-W05 N28-N33
      2  713 1584 (N20E32 L= 39)   290     87        1 ( 677/1547- 742/1604) -18.4 E35-E29 N18-N21
      3 1520 1523 (N35W23 L= 94)  1139    183        3 (1455/1443-1567/1603) -59.0 W17-W26 N30-N41
      4 1176 1355 (N15W02 L= 73)   201     45        0 (1157/1335-1201/1383) -33.7 W00-W03 N14-N16
      5  226 1076 (S17E57 L= 14)  3430    588        9 ( 126/ 867- 370/1334)  55.0 E72-E48 S30-N00
      6 1716 1226 (N21W41 L=112)   630     76        2 (1669/1199-1761/1249)   0.0 W36-W45 N19-N22
      7 1771 1085 (N14W47 L=119)  1370    236        3 (1718/ 986-1814/1184) -74.7 W43-W52 N09-N20
      8 1550 1029 (N05W31 L=103)   893    253        2 (1522/ 918-1585/1145) -81.3 W29-W35 S01-N12
      9 1681 1030 (N08W41 L=112)   270     49        0 (1664/1007-1698/1056) -33.7 W39-W42 N07-N09
     10  316  675 (S41E50 L= 22)   640    137        0 ( 279/ 618- 371/ 712)  29.7 E56-E42 S45-S37
     11 1764  642 (S10W61 L=133)   454     74        1 (1736/ 612-1794/ 675)  68.2 W58-W63 S12-S07
     12 1685  603 (S15W56 L=127)   823    140        2 (1644/ 541-1722/ 655)  90.0 W53-W58 S18-S10
     13 1582  602 (S18W47 L=118)   336     93        0 (1563/ 575-1611/ 639) -53.1 W45-W49 S19-S15
     14 1779  600 (S12W66 L=137)   497     46        3 (1754/ 578-1799/ 625)  90.0 W63-W69 S13-S10
     15 1344  565 (S26W32 L=103)   567    179        1 (1283/ 486-1390/ 619) -21.0 W25-W38 S29-S23
     16 1195  497 (S34W25 L= 97)   287     77        0 (1176/ 462-1217/ 529) -53.1 W22-W26 S36-S32
     17 1720  445 (S21W73 L=144)  1843    123        5 (1674/ 407-1772/ 486)  41.2 W67-W81 S24-S17
     18 1259  440 (S36W32 L=104)   314     68        0 (1228/ 426-1300/ 455)  11.3 W29-W35 S36-S33
     19 1478  350 (S35W56 L=128)  1504    264        1 (1368/ 302-1588/ 416)  55.3 W49-W61 S40-S27
     20 1200  322 (S45W36 L=108)   300     81        0 (1174/ 291-1224/ 356) -18.4 W31-W40 S46-S43
     21 1283  293 (S44W46 L=117)   373     35        1 (1255/ 275-1309/ 316)  26.6 W42-W48 S45-S42
  

    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