Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1639 1686 (N27W64 L=303)   836    101        2 (1608/1657-1663/1712) -36.9 W61-W66 N25-N28
      2 1623 1511 (N17W52 L=291)  1147    191        3 (1559/1469-1687/1546)  -9.5 W45-W57 N14-N19
      3 1788 1468 (N11W67 L=306)  1310    346        0 (1731/1434-1838/1515)   2.9 W58-W78 N09-N12
      4 1173 1420 (N22W18 L=257)   942    265        0 (1046/1385-1315/1467) -31.0 W10-W26 N18-N27
      5 1760 1336 (N04W57 L=296)   386    113        1 (1727/1312-1793/1357)   0.0 W52-W60 N03-N05
      6  594 1213 (N22E23 L=216)  1701    432        5 ( 433/1167- 793/1247) -11.3 E34-E09 N17-N24
      7  916 1200 (N14E03 L=236)   305     66        0 ( 880/1182- 961/1218) -26.6 E04-W00 N13-N15
      8 1264 1185 (N06W17 L=256)   188     54        0 (1241/1159-1290/1215) -63.4 W16-W18 N04-N08
      9 1903 1120 (S11W66 L=305)  1669    285        5 (1874/1071-1943/1192)  21.0 W60-W74 S13-S08
     10  982 1062 (N05E02 L=237)   207     41        1 ( 963/1039-1008/1082)  18.4 E03-W00 N04-N06
     11  652 1043 (N11E22 L=217)   246    112        1 ( 596/1009- 696/1063) -31.0 E25-E19 N07-N12
     12  231  961 (N14E55 L=184)  1023    219        1 ( 186/ 850- 267/1052) -77.0 E58-E52 N06-N19
     13 1879  862 (S26W58 L=297)  3440    306        7 (1815/ 773-1926/ 963)  55.0 W50-W63 S31-S20
     14 1238  889 (S10W10 L=249)   571    294        4 (1123/ 820-1352/ 947)   0.0 W01-W16 S12-S07
     15 1389  870 (S14W18 L=257)   299     42        2 (1368/ 845-1411/ 897)  45.0 W16-W19 S15-S12
     16 1293  771 (S18W11 L=250)   452    181        0 (1200/ 755-1377/ 800)  -9.5 W04-W16 S18-S16
     17  977  740 (S13E09 L=230)   188     38        0 ( 956/ 713- 993/ 768) -71.6 E09-E07 S14-S11
     18  303  565 (S11E62 L=177)   574     88        2 ( 277/ 541- 335/ 588)  -9.5 E64-E58 S12-S08
     19  262  523 (S13E70 L=169)  2022    208        2 ( 227/ 487- 294/ 558) -23.2 E75-E65 S15-S10
     20 1655  519 (S44W37 L=276)   697    124        2 (1622/ 494-1688/ 549)   8.1 W33-W40 S46-S41
     21 1483  401 (S49W21 L=260)  1348    208        3 (1421/ 359-1539/ 470)  29.1 W14-W27 S53-S42
     22  732  352 (S32E37 L=202)  1392    271        3 ( 668/ 273- 779/ 443)  33.7 E46-E30 S36-S26
  

    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