Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  532 1747 (N24E62 L= 66)  1004     72        3 ( 499/1717- 570/1781)   6.3 E67-E57 N21-N26
      2  856 1632 (N24E29 L= 99)   911    174        1 ( 820/1563- 903/1701) -45.0 E32-E24 N19-N28
      3 1478 1614 (N44W12 L=140)   879    136        1 (1414/1579-1551/1637)  14.0 W06-W18 N41-N46
      4 1311 1523 (N31W02 L=130)   454     74        2 (1278/1498-1349/1550)   0.0 W00-W05 N28-N32
      5 1324 1298 (N17W09 L=137)   469    197        0 (1264/1255-1409/1363)  -4.8 W03-W15 N15-N19
      6 1839 1300 (N37W53 L=181)   607     52        0 (1809/1276-1864/1323)  14.0 W48-W56 N34-N38
      7 1473 1285 (N21W19 L=147)   253     69        0 (1440/1262-1500/1315)  68.2 W16-W20 N18-N23
      8 1612 1279 (N26W29 L=157)   264     58        0 (1588/1253-1638/1310) -26.6 W26-W31 N24-N27
      9 1786 1144 (N24W46 L=175)   551    128        0 (1737/1106-1834/1172)  33.7 W42-W51 N20-N26
     10 1666 1030 (N13W38 L=166)   954    244        0 (1584/ 973-1754/1118) -10.6 W30-W46 N11-N15
     11  229 1013 (S27E57 L= 72)   585    151        0 ( 199/ 953- 252/1082) -40.6 E61-E53 S30-S22
     12 1798 1023 (N17W50 L=178)   457     86        0 (1767/ 995-1823/1058)  76.0 W47-W52 N15-N19
     13  818  784 (S26E05 L=123)  1226    227        7 ( 715/ 725- 913/ 835)  47.7 E10-W00 S31-S20
     14 1840  783 (N06W63 L=191)   496     41        1 (1816/ 761-1868/ 799)  15.9 W59-W66 N04-N08
     15 1431  758 (S09W31 L=159)   271    101        0 (1382/ 745-1476/ 783)  38.7 W28-W33 S10-S06
     16 1709  624 (S07W57 L=186)   469     74        1 (1673/ 603-1748/ 639)  33.7 W54-W61 S08-S04
     17  771  599 (S38E03 L=126)   586    147        3 ( 725/ 573- 848/ 630)  14.0 E06-W02 S39-S35
     18  586  602 (S44E17 L=111)   352     72        1 ( 557/ 581- 619/ 627)  45.0 E19-E14 S45-S41
     19  601  526 (S49E14 L=114)   855    126        2 ( 547/ 494- 664/ 569)   4.8 E19-E07 S51-S45
     20 1508  508 (S19W48 L=176)   896    117        1 (1471/ 471-1558/ 564)  -6.3 W43-W52 S22-S17
     21 1729  447 (S14W76 L=204)  2937    159        1 (1681/ 381-1781/ 497) -83.7 W69-W84 S18-S09
  

    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