Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  536 1747 (N31E56 L= 96)  1027    130        2 ( 503/1688- 562/1818) -40.2 E64-E50 N26-N37
      2 1341 1730 (N47W08 L=160)   412     62        0 (1303/1711-1371/1746)  26.6 W04-W10 N44-N49
      3  895 1704 (N33E24 L=128)   611    135        2 ( 837/1659- 952/1728)  -5.7 E28-E18 N30-N35
      4  558 1619 (N22E45 L=108)   939    168        3 ( 519/1573- 640/1676)   0.0 E49-E37 N18-N25
      5  398 1534 (N14E54 L= 99)   829    243        2 ( 380/1414- 432/1632) -65.0 E58-E49 N06-N21
      6  640 1550 (N18E35 L=117)   827    114        5 ( 584/1507- 680/1593) -14.0 E39-E31 N15-N21
      7 1111 1539 (N26E05 L=148)   499    108        0 (1091/1487-1139/1590) -66.8 E06-E02 N22-N29
      8  549 1490 (N13E39 L=113)   421     65        1 ( 511/1471- 583/1517)   0.0 E42-E36 N11-N15
      9 1862 1266 (N27W58 L=211)  2056    225        3 (1771/1205-1927/1347)  -7.8 W47-W70 N23-N29
     10 1707 1190 (N17W41 L=194)   750    144        3 (1683/1113-1734/1252)  83.7 W39-W43 N12-N21
     11 1908 1135 (N20W64 L=217)   841    110        0 (1891/1072-1923/1188) -74.1 W61-W67 N16-N23
     12  808 1114 (S05E14 L=138)   202     50        0 ( 775/1096- 839/1132)  14.0 E16-E12 S06-S04
     13  494 1040 (S14E33 L=119)  1089    214        2 ( 435/ 963- 553/1090)  53.1 E37-E29 S19-S11
     14 1775 1026 (N09W49 L=202)   363     68        3 (1757/ 989-1792/1061) -76.0 W47-W50 N07-N11
     15  943  901 (S15E02 L=150)   326    102        0 ( 896/ 873- 986/ 934)  51.3 E04-W00 S17-S12
     16  627  889 (S21E22 L=130)   206     73        1 ( 606/ 853- 645/ 926) -45.0 E24-E20 S23-S19
     17  322  874 (S26E47 L=106)   632    138        1 ( 264/ 824- 373/ 914) -24.0 E52-E41 S29-S24
     18  276  743 (S35E53 L= 99)   635     82        0 ( 245/ 715- 323/ 773) -20.6 E57-E48 S36-S33
     19  482  590 (S43E33 L=119)  1800    424        2 ( 341/ 535- 632/ 706)  20.8 E49-E20 S47-S32
     20  986  644 (S30W05 L=158)  1177    347        4 ( 822/ 603-1139/ 682)   8.1 E05-W16 S32-S26
     21 1614  579 (S19W50 L=203)   583    161        0 (1548/ 536-1650/ 641)  76.0 W47-W52 S23-S15
     22 1534  585 (S21W44 L=196)   325     38        0 (1515/ 557-1552/ 610) -71.6 W42-W45 S22-S19
     23 1127  501 (S36W19 L=172)   346     74        0 (1094/ 472-1164/ 526)  63.4 W17-W20 S37-S33
     24  763  389 (S52E06 L=147)   289     33        0 ( 745/ 364- 782/ 414)  90.0 E07-E03 S54-S50
     25  550  280 (S69E41 L=112)   848    126        0 ( 490/ 258- 605/ 300)  -5.2 E56-E29 S70-S66
  

    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