Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  907 1683 (N29E28 L=104)   473    145        1 ( 885/1638- 936/1746) -63.4 E32-E25 N25-N33
      2  559 1639 (N17E49 L= 83)  1000    283        2 ( 530/1545- 613/1740) -57.3 E52-E42 N11-N25
      3  627 1629 (N18E43 L= 89)   496    213        1 ( 602/1545- 671/1695) -61.4 E46-E38 N12-N23
      4  696 1551 (N15E35 L= 97)   525    160        1 ( 654/1494- 719/1627) -71.6 E38-E33 N10-N19
      5  468 1305 (S05E41 L= 91)  1008    263        1 ( 426/1180- 501/1401) -59.7 E47-E38 S12-N00
      6 1229 1343 (N17W03 L=135)   280    104        0 (1200/1286-1256/1380)  81.9 W01-W03 N12-N19
      7 1255 1178 (N08W08 L=140)   243     75        1 (1218/1159-1299/1200)  11.3 W05-W10 N06-N09
      8 1543 1163 (N16W26 L=158)   341     57        1 (1520/1129-1563/1196)  90.0 W24-W27 N13-N18
      9  134 1075 (S24E66 L= 66)  1515    247        1 ( 110/ 988- 163/1168)  84.8 E68-E62 S29-S18
     10  295 1105 (S20E49 L= 83)   337     90        1 ( 272/1060- 311/1153)  90.0 E50-E48 S22-S16
     11 1457 1083 (N09W23 L=155)   210     82        1 (1423/1058-1496/1110)  53.1 W21-W24 N06-N10
     12  578  989 (S20E25 L=107)   438    176        1 ( 509/ 922- 645/1046)  59.0 E28-E21 S25-S15
     13 1306 1023 (N01W15 L=147)   295     79        1 (1263/1005-1348/1041)  26.6 W13-W17 N00-N02
     14  763  925 (S19E12 L=120)   277    110        0 ( 721/ 895- 827/ 969)  56.3 E14-E09 S21-S15
     15 1404  958 (N00W23 L=155)   201     72        0 (1366/ 942-1437/ 969)   0.0 W20-W25 N00-N01
     16 1786  938 (N12W50 L=182)   323     41        1 (1769/ 910-1802/ 961) -71.6 W48-W52 N10-N13
     17  312  851 (S35E44 L= 88)   322    101        0 ( 298/ 802- 326/ 899)  90.0 E45-E42 S37-S31
     18 1748  842 (N05W50 L=182)   299    117        0 (1712/ 825-1786/ 870)  38.7 W47-W53 N03-N08
     19 1579  782 (S03W40 L=172)   349     82        1 (1535/ 766-1618/ 802)  26.6 W36-W42 S05-S02
     20 1196  753 (S17W18 L=149)   321     76        1 (1162/ 724-1243/ 777)  53.1 W15-W19 S19-S14
     21 1615  696 (S07W46 L=178)   517     92        2 (1595/ 650-1644/ 745) -59.0 W43-W47 S09-S04
     22 1011  661 (S27W10 L=142)   270     47        1 ( 987/ 634-1039/ 686)   0.0 W08-W12 S28-S25
     23  882  621 (S33W04 L=136)   305     47        2 ( 858/ 596- 904/ 649)  90.0 W01-W05 S35-S31
     24 1624  469 (S18W58 L=190)  1485    258        3 (1532/ 419-1695/ 527)  51.3 W53-W62 S22-S12
     25 1333  280 (S38W51 L=183)  1761    443        3 (1250/ 200-1418/ 371)  -7.4 W39-W62 S39-S35
  

    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