Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1424 1716 (N48W46 L=187)   710    104        1 (1378/1696-1471/1736) -11.3 W40-W51 N45-N49
      2  724 1423 (N31E20 L=121)   704    197        1 ( 679/1345- 757/1501) -61.4 E24-E16 N25-N36
      3  267 1359 (N27E61 L= 80)  1579    216        4 ( 224/1272- 302/1433) -78.7 E65-E56 N21-N31
      4 1092 1320 (N22W06 L=147)   909    289        2 (1010/1240-1169/1359)   5.7 W00-W10 N17-N25
      5  653 1292 (N22E24 L=117)   226     68        0 ( 616/1275- 687/1309)  11.3 E26-E21 N21-N23
      6  283 1291 (N23E56 L= 84)   401     35        2 ( 259/1277- 311/1308)   0.0 E59-E53 N21-N23
      7  410 1237 (N19E42 L= 98)   273     74        3 ( 396/1196- 424/1276)  78.7 E43-E41 N16-N21
      8 1414 1210 (N14W26 L=167)   239     48        0 (1394/1185-1432/1241) -90.0 W24-W27 N12-N15
      9 1645 1095 (N05W42 L=183)   251     29        1 (1621/1075-1663/1116) -45.0 W40-W43 N03-N06
     10 1931  960 (S07W76 L=216)  1491     95        6 (1907/ 918-1953/ 999)  90.0 W70-W85 S09-S04
     11 1872  889 (S10W65 L=206)  1476    168        2 (1845/ 807-1908/ 959)  60.9 W62-W70 S15-S06
     12 1826  918 (S08W59 L=199)   368     50        0 (1810/ 892-1841/ 950) -76.0 W56-W60 S09-S05
     13 1720  896 (S08W47 L=188)   447     99        0 (1696/ 853-1740/ 945) -63.4 W45-W49 S10-S04
     14 1335  863 (S07W19 L=159)   472     87        2 (1311/ 814-1369/ 906) -80.5 W17-W20 S10-S04
     15 1386  816 (S10W22 L=163)   401    112        1 (1335/ 784-1423/ 857)   9.5 W18-W24 S12-S07
     16 1501  806 (S12W30 L=171)   253     27        1 (1486/ 782-1521/ 833) -71.6 W28-W31 S13-S10
     17  761  739 (S12E18 L=123)   359    140        0 ( 723/ 682- 799/ 792)  49.4 E21-E15 S15-S08
     18  347  750 (S11E49 L= 92)   415     59        3 ( 324/ 719- 370/ 776) -56.3 E51-E46 S12-S09
     19 1299  738 (S15W16 L=157)   393    171        0 (1214/ 713-1369/ 755) -16.7 W10-W20 S16-S13
     20 1677  648 (S24W47 L=187)  1642    283        4 (1577/ 544-1754/ 727)  45.0 W39-W53 S30-S19
     21 1337  645 (S21W19 L=160)   286     63        1 (1310/ 623-1370/ 668)  26.6 W17-W21 S22-S19
     22 1419  628 (S23W25 L=166)   503     80        0 (1391/ 584-1449/ 657) -59.0 W22-W27 S25-S20
     23  457  552 (S24E45 L= 96)   827     95        2 ( 434/ 503- 486/ 597)  45.0 E48-E41 S27-S20
     24  612  496 (S28E33 L=108)   271     90        0 ( 593/ 452- 628/ 538) -90.0 E33-E32 S31-S25
     25 1596  467 (S37W45 L=185)   736    147        0 (1524/ 441-1657/ 506)  13.0 W37-W50 S38-S33
     26  393  444 (S32E58 L= 82)  1461    175        1 ( 312/ 426- 478/ 466)   2.3 E73-E47 S33-S30
     27  738  277 (S47E32 L=108)   516     47        1 ( 706/ 256- 766/ 302)  26.6 E36-E28 S49-S44
     28 1388  253 (S55W34 L=175)   457     47        1 (1364/ 232-1409/ 278) -45.0 W31-W39 S57-S51
  

    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