Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1532 1676 (N29W60 L=168)  1490    174        3 (1471/1618-1612/1711)  -2.5 W50-W73 N26-N30
      2 1646 1502 (N16W56 L=164)   622    120        0 (1597/1471-1693/1528) -16.7 W50-W60 N13-N17
      3 1244 1442 (N25W25 L=133)   631    151        2 (1189/1387-1315/1479)   0.0 W20-W30 N22-N26
      4  235 1308 (N41E59 L= 49)   409    104        0 ( 225/1267- 248/1366) -71.6 E60-E55 N38-N44
      5  984 1292 (N23W05 L=113)   623    217        0 ( 950/1204-1050/1360)  37.9 W01-W10 N18-N25
      6 1239 1260 (N15W18 L=126)   302    173        0 (1179/1194-1280/1313) -77.5 W16-W19 N10-N19
      7  684 1196 (N25E16 L= 92)   246    116        0 ( 652/1144- 711/1244) -81.9 E17-E15 N21-N28
      8 1377 1195 (N08W24 L=133)   212    121        0 (1336/1155-1416/1242)  23.2 W21-W28 N06-N09
      9 1829 1170 (S07W58 L=166)   595    106        2 (1811/1122-1850/1226)  51.3 W54-W59 S09-S04
     10 1888 1117 (S12W64 L=172)  2077    239        5 (1860/1041-1931/1214)  25.0 W58-W75 S16-S08
     11 1787 1018 (S14W49 L=157)   806    153        4 (1742/ 955-1828/1090) -73.3 W46-W53 S18-S08
     12 1752  992 (S15W45 L=154)   329     55        0 (1734/ 959-1770/1021)  45.0 W43-W47 S16-S12
     13 1652  743 (S26W33 L=141)  1770    461        6 (1542/ 596-1754/ 881)  27.6 W22-W43 S33-S19
     14 1038  845 (S03E03 L=105)   312    128        0 ( 989/ 811-1094/ 872) -56.3 E05-E01 S06-N00
     15 1899  796 (S33W64 L=172)   615     96        0 (1857/ 773-1935/ 821)  -3.4 W56-W73 S34-S31
     16 1742  731 (S30W42 L=150)   549     99        1 (1722/ 679-1764/ 777)  63.4 W39-W43 S33-S27
     17 1329  598 (S25W07 L=116)   762    367        1 (1257/ 497-1421/ 715)  33.7 W00-W15 S30-S20
     18  881  662 (S10E17 L= 91)   412    182        1 ( 808/ 631- 957/ 698) -32.0 E21-E13 S13-S06
     19  367  591 (S04E55 L= 53)   350     53        0 ( 347/ 567- 392/ 620) -56.3 E56-E53 S05-S02
     20 1619  560 (S38W29 L=137)   828    136        0 (1566/ 519-1671/ 609)  10.3 W23-W34 S40-S35
     21 1167  495 (S28E05 L=103)   308     92        0 (1152/ 462-1189/ 549)  74.1 E06-E03 S30-S23
     22 1734  506 (S48W45 L=153)   789     88        1 (1691/ 483-1778/ 533) -12.1 W37-W53 S50-S45
     23  362  453 (S13E65 L= 44)  1323     80        3 ( 322/ 420- 400/ 487)  -5.7 E69-E59 S15-S10
     24  570  408 (S19E47 L= 61)   452    110        1 ( 553/ 354- 587/ 459)  58.0 E50-E44 S23-S15
  

    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