Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1556 1669 (N39W45 L= 77)   391     50        1 (1535/1641-1575/1695)  39.8 W41-W48 N36-N41
      2 1334 1601 (N33W22 L= 54)   275     67        0 (1299/1583-1377/1614)  -9.5 W19-W25 N31-N34
      3 1824 1465 (N26W66 L= 98)   874    104        1 (1787/1427-1862/1504) -35.5 W62-W71 N23-N28
      4  511 1274 (N12E33 L=359)   756    189        2 ( 489/1212- 556/1371) -68.2 E34-E29 N08-N18
      5  335 1238 (N10E46 L=345)   715    147        2 ( 305/1167- 384/1290)  60.3 E48-E42 N06-N13
      6  727 1081 (N00E18 L= 14)   818    239        2 ( 621/1035- 835/1116)   8.7 E24-E11 S02-N02
      7 1056  893 (S11W02 L= 33)  1313    472        2 ( 997/ 677-1095/1093)  85.2 E01-W04 S24-N00
      8 1795  977 (S05W53 L= 84)   445     81        2 (1763/ 935-1822/1009)  45.0 W50-W55 S07-S02
      9  645  892 (S11E23 L=  8)   678    143        4 ( 585/ 855- 706/ 942)  14.0 E27-E19 S13-S07
     10 1797  893 (S10W54 L= 85)   627     76        1 (1770/ 859-1821/ 939)  53.1 W51-W56 S11-S07
     11 1729  902 (S10W47 L= 79)   456     47        1 (1706/ 864-1752/ 933) -63.4 W45-W49 S11-S07
     12 1201  838 (S14W11 L= 42)   195     52        1 (1177/ 813-1223/ 869)  56.3 W09-W12 S15-S12
     13 1585  763 (S18W37 L= 69)   761    248        1 (1527/ 666-1616/ 865)  80.5 W34-W39 S24-S12
     14 1755  786 (S16W52 L= 83)  1037    257        0 (1697/ 731-1817/ 842)  21.8 W46-W58 S19-S13
     15  610  737 (S20E27 L=  4)   355    132        1 ( 574/ 709- 668/ 784) -31.0 E29-E23 S21-S17
     16  454  760 (S18E38 L=353)   249     48        0 ( 430/ 736- 479/ 783)  21.8 E40-E35 S19-S17
     17  416  652 (S25E44 L=348)   945    186        1 ( 333/ 604- 483/ 713)  21.8 E52-E37 S27-S21
     18 1423  669 (S25W27 L= 58)   245     75        1 (1382/ 653-1455/ 688) -18.4 W23-W29 S25-S23
     19  936  591 (S30E06 L= 25)   530    142        0 ( 866/ 554- 997/ 634)  21.8 E11-E01 S32-S27
     20  511  417 (S41E45 L=347)  3422    403        9 ( 327/ 365- 696/ 489)   7.1 E80-E24 S43-S36
     21 1669  424 (S40W60 L= 91)   675     61        3 (1641/ 400-1703/ 449)  18.4 W55-W65 S41-S38
     22 1542  358 (S46W50 L= 81)  2125    221        6 (1455/ 301-1635/ 431)  31.6 W40-W60 S50-S39
  

    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