Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1445 1601 (N25W45 L=199)   484     97        0 (1392/1579-1491/1622) -38.7 W42-W47 N22-N27
      2 1327 1450 (N20W30 L=183)   814    230        1 (1227/1399-1419/1494)  -4.1 W22-W36 N17-N21
      3 1147 1311 (N17W14 L=168)   584    201        0 (1121/1210-1179/1399)  48.4 W11-W19 N11-N20
      4 1603 1231 (N01W39 L=193)   860    154        2 (1550/1164-1639/1301) -82.9 W37-W41 S03-N05
      5  331 1227 (N32E42 L=111)   404     51        2 ( 305/1206- 360/1250) -18.4 E45-E39 N30-N33
      6 1736 1156 (S07W47 L=201)   773    172        0 (1691/1108-1791/1226) -76.0 W44-W52 S10-S02
      7  410 1090 (N22E37 L=117)   634    143        2 ( 367/1018- 437/1146) -71.6 E39-E34 N17-N26
      8 1854 1055 (S16W56 L=210)  1453    203        5 (1805/ 965-1895/1140)  41.6 W50-W63 S21-S12
      9 1723 1082 (S11W44 L=198)   268     62        1 (1707/1061-1753/1111) -56.3 W42-W46 S12-S09
     10  234 1001 (N21E54 L= 99)  1128    158        1 ( 208/ 941- 281/1081) -60.9 E56-E50 N16-N25
     11 1722 1014 (S15W43 L=196)   935    191        3 (1658/ 953-1778/1051) -45.0 W38-W48 S19-S11
     12  132 1006 (N23E68 L= 86)   523     59        0 ( 115/ 981- 151/1033) -31.0 E70-E64 N21-N24
     13 1666  904 (S19W36 L=190)   797    219        2 (1622/ 825-1714/1012) -80.5 W33-W39 S24-S12
     14 1032  909 (S02E02 L=151)  1097    265        5 ( 929/ 802-1102/ 992) -77.0 E06-W00 S09-N04
     15 1549  935 (S14W28 L=182)   406    114        1 (1532/ 862-1567/ 984)  50.2 W25-W30 S17-S11
     16  470  916 (N11E36 L=118)   331     68        1 ( 432/ 891- 500/ 945)   9.5 E38-E32 N09-N12
     17 1595  912 (S17W31 L=185)   421     87        1 (1557/ 882-1633/ 945)   8.1 W27-W34 S17-S15
     18 1739  922 (S20W43 L=196)   263     44        1 (1717/ 894-1754/ 944) -90.0 W40-W44 S22-S19
     19 1851  717 (S38W56 L=209)   941    116        0 (1805/ 687-1879/ 768)  20.6 W48-W59 S39-S34
     20  863  571 (S17E21 L=133)  1654    499        3 ( 707/ 445-1036/ 738)  19.0 E35-E06 S21-S11
     21 1515  682 (S28W21 L=175)   280     69        0 (1481/ 669-1556/ 702) -31.0 W18-W24 S29-S26
     22  342  551 (S07E59 L= 95)  2929    434        6 ( 207/ 415- 515/ 689) -51.3 E67-E49 S18-N03
     23 1240  597 (S25W01 L=155)  1385    375        1 (1079/ 523-1400/ 683)   0.0 E10-W13 S27-S22
     24  364  605 (S04E54 L=100)   432     97        1 ( 334/ 567- 391/ 652) -90.0 E55-E51 S06-N00
     25  550  485 (S15E45 L=109)  1717    516        5 ( 420/ 324- 665/ 647)  87.7 E48-E40 S27-S02
     26  930  421 (S28E23 L=131)   343    102        0 ( 884/ 392- 978/ 451)   7.1 E26-E18 S29-S26
  

    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