Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1623 1572 (N17W59 L=185)   760    125        1 (1601/1498-1643/1614)  29.1 W54-W64 N13-N19
      2 1708 1554 (N13W66 L=193)  1889    161        4 (1661/1493-1754/1613) -82.9 W61-W71 N09-N17
      3 1549 1541 (N18W50 L=177)   339     40        0 (1523/1522-1579/1559) -11.3 W48-W53 N17-N19
      4 1798 1484 (N06W71 L=198)   760     64        0 (1767/1459-1822/1510)   0.0 W66-W78 N05-N07
      5 1821 1347 (S01W64 L=191)  1049     97        1 (1769/1305-1858/1378)  -9.5 W58-W70 S03-N01
      6 1213 1339 (N18W20 L=147)   596    136        0 (1148/1321-1293/1357) -35.5 W15-W24 N15-N20
      7 1025 1260 (N19W07 L=133)   449    151        0 ( 962/1217-1085/1296) -50.2 W03-W08 N15-N22
      8 1866 1130 (S14W60 L=187)  8072    389       13 (1767/ 996-1951/1271) -68.2 W48-W80 S23-S03
      9  407 1035 (N22E38 L= 88)  1753    386        1 ( 288/ 897- 518/1168) -56.3 E48-E32 N11-N32
     10 1412  895 (S11W18 L=145)   732    362        1 (1370/ 751-1433/1080)  57.1 W12-W23 S18-S01
     11  658 1046 (N17E20 L=106)   410    178        0 ( 595/1021- 759/1076) -31.0 E24-E14 N13-N19
     12 1826  976 (S21W52 L=178)   354     48        1 (1796/ 958-1853/ 994) -26.6 W48-W54 S22-S18
     13 1796  929 (S22W47 L=174)   491    108        1 (1762/ 910-1842/ 964)  -6.3 W43-W52 S23-S19
     14 1539  641 (S31W21 L=148)  3623    562        5 (1398/ 434-1678/ 875)  33.2 W06-W35 S40-S20
     15  913  763 (S05E13 L=114)   217     43        0 ( 880/ 746- 936/ 785) -18.4 E14-E11 S06-S03
     16 1322  764 (S16W10 L=136)   261     59        0 (1288/ 742-1356/ 780) -45.0 W07-W11 S18-S14
     17  744  677 (S06E25 L=102)   476    161        1 ( 730/ 585- 763/ 748)  63.4 E28-E22 S11-S01
     18  575  658 (S03E36 L= 91)   457    114        1 ( 528/ 626- 617/ 709) -63.4 E38-E33 S05-N01
     19  477  672 (N00E43 L= 84)   532    118        2 ( 424/ 641- 527/ 706)  -8.1 E46-E38 S01-N01
     20 1157  623 (S20E04 L=123)   535    219        0 (1108/ 530-1207/ 704)  35.0 E09-W01 S24-S15
     21  924  535 (S18E20 L=107)   818    281        1 ( 893/ 405- 969/ 661)  42.9 E26-E12 S25-S12
     22 1670  531 (S44W32 L=159)   359     38        0 (1650/ 513-1700/ 550)   0.0 W29-W35 S45-S42
     23  984  386 (S30E22 L=104)   237     81        0 ( 939/ 375-1025/ 397) -45.0 E24-E19 S31-S27
     24 1107  169 (S52E31 L= 96)   421     75        0 (1068/ 153-1141/ 186)   0.0 E35-E27 S53-S50
  

    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