Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1350 1650 (N32W43 L=246)   476    118        0 (1307/1627-1411/1667) -45.0 W39-W46 N28-N33
      2 1734 1567 (N13W69 L=273)  1581    345        3 (1698/1517-1769/1605)   4.1 W63-W79 N10-N15
      3 1612 1511 (N15W53 L=257)   390     77        0 (1578/1479-1644/1542) -71.6 W51-W55 N12-N18
      4  917 1373 (N29W04 L=207)   306     76        0 ( 875/1349- 964/1389)  -9.5 W00-W06 N27-N30
      5 1416 1347 (N13W32 L=236)  2117    505        4 (1208/1304-1628/1372) -24.0 W19-W46 N06-N18
      6  594 1164 (N25E22 L=181)   667    173        2 ( 561/1077- 624/1250) -90.0 E23-E20 N19-N31
      7 1847 1152 (S11W58 L=262)  1281    204        4 (1803/1047-1872/1208) -90.0 W55-W62 S17-S06
      8 1799 1145 (S10W53 L=257)   412     74        2 (1778/1126-1828/1169) -53.1 W51-W55 S11-S07
      9 1798 1075 (S14W51 L=255)   587    137        1 (1768/1022-1837/1122) -63.4 W49-W53 S17-S09
     10  980 1051 (N09E02 L=202)   278     81        1 ( 963/1001- 998/1101)  68.2 E03-W00 N06-N11
     11 1641 1049 (S09W37 L=241)   395     92        0 (1609/1017-1673/1072) -68.2 W35-W39 S12-S07
     12 1773  972 (S18W46 L=250)   298     59        0 (1755/ 941-1788/1005)  45.0 W43-W47 S20-S16
     13 1029  938 (N02E02 L=202)   567    156        1 ( 963/ 913-1107/ 986) -54.5 E05-W01 S01-N06
     14  231  923 (N19E57 L=147)   393     70        0 ( 220/ 887- 245/ 964) -90.0 E58-E54 N16-N21
     15 1291  874 (S09W11 L=215)   265     36        0 (1273/ 847-1309/ 905)  56.3 W09-W12 S10-S07
     16 1407  689 (S23W13 L=217)  1761    370        2 (1343/ 524-1452/ 850)  71.6 W07-W15 S33-S11
     17  359  768 (N08E49 L=155)   313     33        0 ( 342/ 741- 377/ 797) -90.0 E50-E47 N05-N09
     18  394  610 (S02E52 L=152)   360     90        0 ( 375/ 576- 411/ 646)  31.0 E55-E49 S03-N00
     19  383  511 (S08E58 L=145)  1470    293        3 ( 313/ 457- 488/ 598) -50.7 E64-E51 S13-S01
     20  836  495 (S19E26 L=178)   332     98        0 ( 791/ 453- 872/ 528) -71.6 E27-E24 S21-S15
     21  584  450 (S16E44 L=159)   740    225        3 ( 558/ 357- 618/ 526)  54.0 E51-E39 S21-S10
     22 1224  486 (S30E04 L=200)   240     58        1 (1197/ 463-1255/ 516) -68.2 E04-E02 S32-S27
     23  424  427 (S14E59 L=144)  1586    254        4 ( 351/ 377- 494/ 491) -59.0 E65-E54 S18-S08
     24  827  306 (S31E36 L=168)  1427    294        3 ( 736/ 256- 886/ 402)  16.4 E44-E27 S35-S25
  

    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