Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1588 1619 (N21W58 L=237)   836    195        1 (1528/1588-1668/1649) -37.9 W52-W63 N17-N24
      2 1711 1529 (N13W63 L=242)   567     77        0 (1668/1512-1755/1546) -10.3 W57-W68 N11-N13
      3 1195 1457 (N24W22 L=202)   329    132        1 (1122/1445-1249/1480) -29.7 W18-W25 N21-N26
      4 1569 1388 (N10W43 L=222)   285     49        1 (1541/1366-1594/1404) -26.6 W40-W44 N08-N10
      5 1030 1298 (N19W07 L=187)   276     65        1 ( 994/1273-1055/1322) -45.0 W05-W09 N17-N20
      6  873 1252 (N21E03 L=176)   306    135        0 ( 815/1212- 925/1286)  -8.1 E07-W00 N19-N22
      7 1709 1166 (S06W45 L=225)   478    106        0 (1654/1142-1755/1194) -35.5 W41-W48 S08-S02
      8  537 1160 (N24E26 L=153)   225     77        0 ( 511/1132- 571/1193) -68.2 E27-E24 N21-N26
      9  761 1143 (N17E12 L=167)   211     62        1 ( 746/1112- 777/1183)  45.0 E13-E10 N15-N19
     10 1798 1128 (S11W52 L=231)   555    104        3 (1773/1086-1827/1175)  33.7 W48-W56 S12-S08
     11  310 1090 (N25E45 L=134)   518    122        1 ( 286/1029- 346/1136)  50.2 E48-E41 N21-N27
     12 1729  793 (S28W40 L=219)  5095    756       10 (1526/ 520-1871/1131)  35.4 W19-W59 S40-S12
     13  198  918 (N17E60 L=119)  4880    535       16 ( 138/ 724- 270/1128) -85.4 E69-E51 N05-N30
     14 1251 1050 (N00W13 L=192)   650    154        4 (1199/ 972-1280/1110) -90.0 W11-W14 S04-N04
     15 1417 1003 (S07W21 L=201)   511    208        0 (1370/ 965-1481/1090) -76.0 W19-W25 S09-S01
     16 1499 1047 (S07W27 L=207)   292    120        1 (1437/1009-1532/1064) -26.6 W23-W29 S08-S04
     17 1629  998 (S13W35 L=214)   347     68        2 (1599/ 973-1660/1016)   0.0 W32-W37 S14-S11
     18 1404  859 (S14W17 L=197)   631    187        1 (1360/ 793-1473/ 894)   7.1 W13-W21 S17-S12
     19 1190  801 (S12W03 L=183)   193     64        0 (1160/ 773-1213/ 836) -76.0 W02-W04 S13-S09
     20  624  748 (S01E30 L=149)   866    226        1 ( 537/ 667- 696/ 834) -65.6 E33-E27 S06-N05
     21 1093  620 (S20E07 L=173)   208     57        1 (1076/ 595-1112/ 654)  76.0 E08-E05 S21-S17
     22  902  621 (S15E17 L=162)   201     85        1 ( 866/ 599- 931/ 649) -63.4 E18-E15 S16-S12
     23  562  468 (S16E45 L=135)  1488    371        4 ( 461/ 365- 680/ 590)  16.5 E59-E32 S20-S11
     24  306  551 (S06E63 L=117)   880    111        2 ( 265/ 530- 377/ 576)   0.0 E68-E54 S07-S04
     25  817  415 (S25E30 L=149)  2235    506        4 ( 599/ 289- 999/ 526)   7.3 E54-E15 S29-S22
     26  331  433 (S14E70 L=110)  1102    101        3 ( 303/ 392- 354/ 475)  32.0 E74-E64 S16-S11
  

    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