Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1341 1760 (N39W49 L=198)  1564    254        1 (1215/1709-1440/1807)  -2.0 W35-W64 N37-N40
      2 1682 1462 (N12W56 L=205)   417     56        0 (1670/1426-1696/1500)  38.7 W53-W58 N10-N14
      3 1804 1460 (N09W70 L=219)   522     94        0 (1777/1424-1823/1497)  78.7 W67-W72 N06-N11
      4  640 1399 (N34E16 L=133)   470    105        0 ( 595/1381- 706/1419) -14.0 E19-E11 N32-N35
      5 1737 1321 (N03W54 L=203)   489     71        1 (1702/1299-1771/1341) -26.6 W50-W57 N01-N04
      6  858 1300 (N23E04 L=145)   281     81        0 ( 816/1277- 895/1316)   0.0 E06-E01 N21-N23
      7 1349 1242 (N08W24 L=173)   289     72        0 (1329/1212-1373/1278) -78.7 W22-W24 N05-N10
      8 1850 1093 (S13W59 L=208)  4371    270        9 (1772/1001-1933/1193) -77.0 W51-W72 S18-S05
      9  918 1156 (N13E03 L=146)   197    119        0 ( 858/1139- 968/1176) -18.4 E06-W00 N12-N14
     10 1514 1123 (S02W31 L=180)   234     82        0 (1475/1090-1537/1154)  18.4 W27-W33 S03-N00
     11  363 1040 (N18E42 L=107)  1520    316        5 ( 231/ 999- 482/1125)   4.8 E55-E31 N15-N20
     12 1595 1013 (S11W34 L=183)   335     87        0 (1581/ 975-1613/1064)  68.2 W32-W36 S12-S07
     13 1702  862 (S22W41 L=190)   391     73        0 (1681/ 825-1718/ 904)  68.2 W38-W42 S24-S19
     14 1548  792 (S22W27 L=176)   941    203        1 (1470/ 719-1602/ 876)  26.6 W20-W32 S25-S18
     15 1354  730 (S21W13 L=162)   762    241        0 (1312/ 628-1408/ 835)  45.0 W08-W18 S26-S16
     16 1573  671 (S31W28 L=177)   424    107        0 (1527/ 638-1615/ 715)  15.9 W24-W31 S32-S28
     17  486  624 (S09E43 L=106)   348     70        1 ( 467/ 589- 504/ 654)  63.4 E45-E41 S10-S06
     18  983  515 (S26E15 L=134)   416    165        0 ( 947/ 444-1016/ 582)  41.2 E19-E11 S29-S22
     19 1722  482 (S51W49 L=198)   612     47        0 (1693/ 463-1753/ 499)  -9.5 W43-W56 S52-S48
     20  694  349 (S30E42 L=107)   867    258        0 ( 673/ 231- 719/ 463)  40.1 E53-E34 S39-S22
  

    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