Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1261 1631 (N34W36 L=181)   352     68        1 (1237/1599-1295/1650)   9.5 W33-W39 N32-N35
      2 1435 1628 (N28W48 L=193)  1218    208        3 (1337/1607-1541/1645) -26.6 W40-W55 N24-N32
      3 1693 1484 (N12W59 L=204)   997    112        3 (1648/1443-1738/1536) -76.0 W56-W61 N08-N16
      4 1168 1406 (N24W19 L=164)   859    245        0 (1048/1373-1272/1451) -31.6 W12-W25 N20-N29
      5 1826 1264 (S03W61 L=205)   526     39        1 (1803/1242-1848/1290)  14.0 W57-W63 S04-S02
      6 1781 1163 (S07W52 L=197)  1260    247        2 (1715/1087-1849/1279) -69.0 W49-W57 S13-N00
      7 1870 1200 (S09W63 L=208)   471     59        1 (1845/1174-1902/1217) -14.0 W60-W68 S09-S07
      8  653 1090 (N20E20 L=125)  1448    354        1 ( 507/1023- 805/1179) -43.2 E28-E12 N12-N27
      9 1852 1061 (S15W57 L=202)  1868    211        8 (1780/ 977-1917/1145)   5.7 W47-W68 S19-S11
     10 1922  982 (S23W66 L=211)   846     89        3 (1883/ 951-1948/1020)   5.7 W58-W71 S24-S21
     11  182  950 (N20E63 L= 82)   773    159        0 ( 142/ 881- 220/1019) -41.6 E68-E59 N16-N24
     12 1057  895 (S01E01 L=143)   482    156        1 (1021/ 847-1111/ 932)  11.3 E04-W01 S03-N01
     13 1469  674 (S25W17 L=162)  2060    462        8 (1343/ 490-1576/ 851)  36.0 W05-W27 S33-S16
     14 1786  790 (S29W46 L=190)   481     55        0 (1767/ 762-1804/ 816)  45.0 W43-W47 S31-S27
     15  380  683 (N02E50 L= 95)   763    168        1 ( 357/ 602- 412/ 760)  66.0 E52-E45 S03-N06
     16  823  727 (S05E19 L=126)   201     64        1 ( 803/ 702- 847/ 756)  26.6 E20-E16 S06-S03
     17  793  648 (S09E23 L=122)   432    157        2 ( 774/ 592- 841/ 710) -82.9 E24-E20 S12-S04
     18 1053  641 (S15E08 L=137)   222     77        2 (1026/ 622-1089/ 665)   0.0 E10-E06 S16-S13
     19  985  609 (S16E13 L=132)   651    124        2 ( 954/ 548-1030/ 664)  76.0 E15-E10 S19-S11
     20  681  612 (S08E31 L=114)   249     56        0 ( 657/ 585- 710/ 638) -63.4 E31-E29 S10-S06
     21 1559  553 (S37W22 L=167)   291     61        0 (1532/ 526-1582/ 582)  26.6 W19-W24 S38-S35
     22 1011  522 (S22E14 L=130)   253     43        1 ( 987/ 496-1040/ 545) -33.7 E15-E12 S23-S19
     23  722  439 (S20E35 L=110)   590    136        3 ( 697/ 378- 743/ 514)  56.3 E38-E31 S23-S14
     24  626  474 (S15E40 L=105)   318     77        1 ( 604/ 447- 649/ 506)  36.9 E42-E38 S17-S13
     25  883  233 (S39E38 L=107)  1980    275        4 ( 796/ 170- 964/ 333)  18.4 E50-E25 S42-S32
     26 1358  261 (S54E01 L=144)   372     55        0 (1324/ 250-1390/ 274) -31.0 E04-W01 S56-S51
  

    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