Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  720 1744 (N33E39 L=126)   467     68        1 ( 687/1721- 758/1759)  36.9 E41-E35 N31-N34
      2  440 1592 (N19E53 L=111)  4320    366       13 ( 372/1439- 533/1751) -46.3 E71-E43 N08-N31
      3  939 1594 (N26E17 L=148)   496     94        2 ( 916/1546- 966/1641) -63.4 E18-E14 N23-N29
      4 1119 1563 (N28E05 L=160)   231     90        0 (1099/1517-1138/1602) -56.3 E06-E02 N24-N30
      5  570 1462 (N12E37 L=128)   253     27        0 ( 554/1441- 590/1491) -45.0 E38-E35 N10-N13
      6 1820 1287 (N27W53 L=218)  1771    150        5 (1774/1222-1881/1346) -22.6 W47-W60 N23-N30
      7  270 1277 (S03E56 L=108)  1052    111        2 ( 242/1205- 305/1325) -50.2 E60-E53 S06-N00
      8 1560 1225 (N16W29 L=194)   803    202        1 (1533/1129-1604/1309)  85.2 W28-W31 N09-N21
      9 1814 1186 (N20W52 L=216)   835    160        0 (1795/1104-1850/1242) -63.4 W49-W56 N15-N23
     10 1636 1118 (N11W36 L=201)   396     88        1 (1622/1061-1650/1166) -63.4 W34-W37 N07-N13
     11  468 1090 (S12E36 L=129)   383     92        2 ( 444/1052- 494/1127) -76.0 E37-E33 S13-S09
     12  340 1093 (S13E46 L=118)   333     84        0 ( 310/1062- 378/1113)  18.4 E48-E42 S14-S11
     13  738  944 (S16E16 L=149)   235     52        0 ( 710/ 920- 770/ 961)  26.6 E17-E13 S17-S14
     14  205  898 (S26E60 L=105)   407     79        0 ( 170/ 868- 235/ 922) -14.0 E64-E56 S27-S24
     15  186  728 (S36E68 L= 97)   652     56        0 ( 160/ 707- 225/ 745)   0.0 E73-E61 S37-S35
     16  858  688 (S29E04 L=161)  1174    351        1 ( 694/ 639-1010/ 724)   5.4 E15-W06 S32-S27
     17 1484  640 (S19W38 L=202)   460    140        1 (1437/ 594-1511/ 702)  90.0 W35-W39 S22-S15
     18 1707  651 (S13W55 L=220)   305     37        1 (1684/ 631-1728/ 674)  56.3 W53-W57 S14-S11
     19 1725  570 (S17W61 L=226)  1550    242        1 (1628/ 499-1807/ 661)  50.2 W55-W65 S22-S09
     20  360  586 (S45E48 L=117)  1312    202        2 ( 271/ 553- 447/ 627)   9.5 E60-E36 S47-S40
     21  985  558 (S35W07 L=172)   232     63        0 ( 960/ 523-1011/ 580)  63.4 W06-W08 S37-S33
     22 1564  470 (S27W53 L=217)   429     71        0 (1527/ 455-1604/ 488)  14.0 W48-W56 S27-S25
     23  653  423 (S52E17 L=147)   409     62        1 ( 617/ 408- 688/ 451)  14.0 E21-E13 S53-S49
     24  505  284 (S69E53 L=112)   731    109        0 ( 461/ 270- 560/ 305)  -2.6 E66-E39 S69-S66
  

    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