Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1477 1556 (N32W43 L=319)  1611    357        0 (1317/1491-1624/1595) -24.4 W31-W53 N24-N36
      2  547 1450 (N38E31 L=244)   304     65        2 ( 516/1428- 581/1474) -18.4 E34-E28 N36-N40
      3  341 1367 (N34E51 L=225)  1890    317        3 ( 221/1287- 441/1438) -16.4 E73-E39 N28-N38
      4  952 1345 (N26E01 L=275)   524    221        0 ( 851/1333-1062/1356) -13.0 E07-W06 N24-N27
      5 1578 1284 (N13W41 L=316)   478     78        1 (1554/1233-1602/1331)  80.5 W39-W42 N10-N16
      6 1243 1157 (N11W15 L=291)   318    110        1 (1179/1135-1286/1179) -26.6 W11-W17 N09-N13
      7 1696 1149 (N03W47 L=323)   286    100        0 (1675/1129-1725/1178) -36.9 W44-W49 N02-N05
      8 1817 1107 (S01W58 L=333)   778    127        1 (1778/1057-1853/1168) -63.4 W54-W62 S04-N02
      9 1869 1122 (S02W65 L=341)   453     65        1 (1842/1094-1901/1141)  14.0 W61-W70 S03-N00
     10  827 1029 (N08E12 L=264)   271    121        0 ( 808/ 965- 842/1085) -81.9 E12-E11 N04-N11
     11 1862  988 (S10W62 L=338)   516     70        2 (1843/ 958-1885/1015)  18.4 W59-W65 S11-S07
     12 1743  857 (S15W48 L=324)  1932    363        7 (1706/ 737-1793/ 968) -79.4 W44-W53 S23-S07
     13 1832  942 (S12W58 L=333)   453     95        0 (1789/ 909-1862/ 968) -29.1 W52-W61 S14-S09
     14 1673  874 (S13W41 L=317)   927    195        4 (1636/ 813-1706/ 955)  66.0 W38-W44 S16-S07
     15  351  778 (S03E49 L=226)   671    110        3 ( 322/ 745- 395/ 824) -45.0 E52-E45 S04-N00
     16 1312  746 (S15W14 L=290)   371    101        0 (1268/ 729-1360/ 769) -26.6 W11-W17 S16-S12
     17  227  728 (S06E64 L=211)   702     65        0 ( 203/ 698- 248/ 751) -36.9 E67-E61 S07-S04
     18 1210  617 (S22W07 L=282)  1379    329        0 (1171/ 512-1280/ 743)  78.7 W04-W10 S29-S14
     19  395  615 (S13E50 L=226)  1015    299        3 ( 351/ 498- 432/ 728)  82.9 E55-E44 S21-S05
     20  276  634 (S12E62 L=214)  1900    220        6 ( 237/ 567- 328/ 710)  48.0 E67-E56 S16-S06
     21  981  460 (S30E11 L=265)   476    181        1 ( 923/ 408-1023/ 523)  31.0 E16-E06 S32-S25
     22  353  469 (S24E63 L=212)   706     45        2 ( 330/ 441- 377/ 499)  26.6 E68-E59 S25-S21
     23 1400  384 (S43W21 L=296)   901    102        2 (1354/ 348-1439/ 427)  29.7 W16-W24 S45-S39
  

    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