Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  382 1506 (N25E49 L=  4)  2013    405        3 ( 304/1414- 484/1584) -23.2 E59-E38 N18-N30
      2  774 1488 (N24E18 L= 34)   628    274        2 ( 638/1456- 894/1517)  -9.5 E28-E10 N22-N25
      3 1101 1435 (N21W03 L= 56)   207     48        0 (1073/1419-1133/1452) -26.6 W01-W05 N20-N22
      4  880 1395 (N18E10 L= 42)   214     58        0 ( 848/1365- 903/1418) -36.9 E12-E08 N16-N19
      5  293 1308 (N12E52 L=  0)   510    114        1 ( 261/1268- 322/1337) -45.0 E55-E49 N09-N14
      6 1776 1288 (N16W52 L=105)   340     20        0 (1757/1266-1796/1308) -33.7 W50-W54 N14-N17
      7  810 1252 (N09E14 L= 39)   203     43        0 ( 791/1227- 828/1281) -45.0 E15-E12 N07-N10
      8 1742 1173 (N09W48 L=101)  1279    308        7 (1691/1076-1815/1251)  74.7 W43-W55 N02-N13
      9  557 1131 (N01E30 L= 23)   319     70        1 ( 521/1097- 597/1162)  21.8 E31-E26 N00-N03
     10 1624 1072 (N02W39 L= 91)  1161    215        3 (1536/1028-1694/1110)   0.0 W32-W44 N00-N04
     11 1826  992 (S01W57 L=110)   505     98        1 (1806/ 944-1845/1036)  59.0 W54-W58 S04-N01
     12 1670 1000 (S02W42 L= 95)   296     96        0 (1627/ 986-1709/1019)  18.4 W39-W45 S03-N00
     13 1780  963 (S04W52 L=105)   384     62        1 (1763/ 932-1802/ 989) -45.0 W50-W54 S05-S02
     14  389  746 (S22E43 L=  9)  1469    440        1 ( 331/ 581- 437/ 936)  65.6 E52-E38 S32-S10
     15 1218  889 (S12W12 L= 65)   184     70        0 (1198/ 856-1237/ 926) -63.4 W10-W13 S13-S09
     16  442  842 (S16E38 L= 15)   228     11        0 ( 421/ 826- 462/ 858) -33.7 E39-E36 S17-S15
     17 1476  705 (S21W31 L= 84)  1468    347        2 (1398/ 585-1520/ 857) -58.0 W24-W35 S28-S12
     18 1794  784 (S14W56 L=109)  3547    620        9 (1705/ 707-1891/ 856)  35.5 W48-W68 S19-S09
     19  248  816 (S18E55 L=357)   363    104        1 ( 213/ 798- 283/ 833)  -8.1 E59-E51 S18-S16
     20 1304  764 (S19W19 L= 71)   336    141        1 (1250/ 732-1344/ 828)  56.3 W15-W21 S20-S14
     21 1693  791 (S15W47 L=100)   334     62        1 (1671/ 756-1713/ 821) -63.4 W44-W48 S16-S12
     22  599  594 (S32E29 L= 24)  2466    636        4 ( 425/ 442- 792/ 754)  31.7 E48-E13 S42-S21
     23 1812  684 (S20W61 L=114)   727    103        1 (1777/ 655-1846/ 708)  31.0 W57-W64 S21-S17
     24 1731  600 (S26W55 L=108)  2274    378        2 (1661/ 555-1840/ 682)  13.2 W49-W67 S28-S20
     25 1015  479 (S39W02 L= 54)   522    110        1 ( 961/ 443-1069/ 524)  40.6 E02-W05 S41-S35
     26 1512  478 (S36W40 L= 93)   656     78        3 (1474/ 446-1549/ 520)  71.6 W37-W42 S38-S32
  

    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