Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1361 1675 (N46W35 L=188)   555     83        3 (1322/1646-1397/1695)  -8.1 W32-W39 N43-N47
      2 1618 1665 (N42W65 L=218)   739     66        1 (1582/1641-1653/1688) -16.7 W60-W71 N39-N43
      3 1533 1527 (N33W44 L=196)   342     54        1 (1506/1503-1560/1544) -26.6 W41-W46 N31-N34
      4  580 1421 (N31E31 L=122)   478    130        1 ( 556/1363- 601/1481) -63.4 E34-E28 N26-N34
      5  190 1348 (N25E73 L= 80)  1098    119        1 ( 162/1298- 218/1397)  74.1 E77-E69 N21-N28
      6  917 1295 (N22E06 L=147)   997    277        5 ( 835/1233- 994/1345)   5.2 E11-W00 N17-N24
      7  295 1285 (N22E55 L= 98)   428    124        1 ( 278/1231- 309/1342) -81.9 E57-E53 N18-N25
      8  491 1297 (N23E37 L=116)   494    142        2 ( 445/1270- 558/1322)   6.3 E40-E31 N21-N24
      9 1553 1277 (N17W37 L=190)   407    100        1 (1535/1234-1587/1309)  45.0 W35-W40 N14-N18
     10 1513  924 (S04W31 L=184)   966    301        2 (1383/ 838-1590/1011) -35.5 W22-W36 S10-N01
     11 1050  834 (S07W01 L=154)   780    353        0 ( 959/ 733-1143/ 893)  48.4 E05-W06 S13-S03
     12 1841  803 (S15W62 L=215)   679     76        1 (1815/ 766-1866/ 837)  31.0 W59-W65 S17-S12
     13 1214  741 (S14W11 L=164)  1154    402        2 (1038/ 667-1341/ 816)   6.0 W00-W19 S18-S09
     14 1750  775 (S16W52 L=204)   387     75        1 (1731/ 733-1771/ 805)  53.1 W49-W53 S18-S14
     15  590  761 (S11E29 L=124)   288    101        0 ( 561/ 718- 621/ 798)  51.3 E31-E26 S13-S08
     16  245  747 (S12E60 L= 92)  1022     93        3 ( 214/ 705- 282/ 793) -80.5 E63-E56 S14-S08
     17 1524  623 (S24W33 L=186)  1408    275        1 (1431/ 522-1614/ 699)  42.5 W27-W39 S30-S19
     18  404  666 (S17E46 L=107)   660    175        1 ( 349/ 630- 459/ 692)  -6.3 E51-E41 S19-S14
     19  340  549 (S25E57 L= 95)   939    102        3 ( 316/ 506- 365/ 595)  37.9 E62-E52 S28-S21
     20  592  511 (S27E34 L=119)   486    138        1 ( 568/ 440- 611/ 559)  56.3 E37-E31 S32-S23
     21 1514  475 (S35W36 L=189)   315     48        1 (1483/ 461-1542/ 493)   0.0 W33-W38 S35-S33
     22  642  293 (S46E41 L=112)   479     51        1 ( 620/ 271- 662/ 313)  29.7 E44-E37 S47-S43
     23 1377  214 (S59W39 L=191)  1512    134        2 (1333/ 173-1420/ 252) -22.4 W28-W62 S67-S53
  

    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