Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1330 1789 (N45W55 L=197)   599     86        2 (1307/1759-1363/1827)  56.3 W50-W60 N42-N48
      2 1467 1624 (N31W49 L=192)   402     39        1 (1443/1594-1488/1644)  18.4 W46-W52 N29-N32
      3  411 1608 (N58E50 L= 92)   488     51        2 ( 384/1576- 434/1635) -32.0 E56-E45 N55-N60
      4 1567 1603 (N27W56 L=199)   612     67        3 (1530/1576-1604/1628) -51.3 W53-W59 N24-N29
      5  338 1566 (N55E60 L= 82)   462     39        1 ( 319/1544- 357/1585) -15.3 E65-E54 N53-N56
      6  903 1477 (N37W03 L=145)   382     70        1 ( 873/1447- 934/1503)  21.8 W00-W05 N34-N38
      7  682 1417 (N38E15 L=127)   690    133        2 ( 659/1359- 707/1487)  83.7 E16-E12 N33-N42
      8  308 1254 (N33E49 L= 93)   370     60        2 ( 282/1231- 344/1272)  18.4 E52-E45 N32-N34
      9  649 1155 (N22E21 L=121)   864    248        3 ( 591/1057- 717/1264) -71.6 E23-E17 N14-N29
     10 1663 1137 (S01W43 L=185)   471    151        0 (1640/1064-1683/1204)  45.0 W39-W45 S04-N02
     11 1840 1116 (S08W59 L=201)   571     93        1 (1800/1085-1876/1140) -18.4 W54-W63 S09-S05
     12 1858 1005 (S15W58 L=200)  1242    203        1 (1808/ 920-1893/1090)  28.3 W51-W64 S18-S10
     13 1044  872 (S02E02 L=140)   194     64        0 (1014/ 855-1066/ 902)  33.7 E03-W00 S03-N00
     14  475  870 (N08E37 L=105)   312     70        2 ( 449/ 848- 514/ 892)  11.3 E39-E34 N06-N09
     15 1895  855 (S25W64 L=206)   734     83        0 (1866/ 826-1920/ 889)  15.9 W58-W68 S26-S23
     16  585  819 (N03E31 L=111)   314     97        1 ( 547/ 801- 633/ 841)  -9.5 E33-E27 N02-N04
     17  703  776 (S01E24 L=118)   428    136        0 ( 635/ 759- 758/ 811)   0.0 E28-E20 S02-N00
     18 1492  679 (S24W22 L=164)  1390    301        2 (1414/ 547-1563/ 793)  45.0 W15-W28 S31-S18
     19  988  641 (S15E10 L=132)   790    235        5 ( 951/ 578-1034/ 750)  59.0 E13-E06 S18-S08
     20  374  628 (S05E52 L= 90)   490    117        0 ( 353/ 569- 401/ 682)  82.9 E53-E50 S09-S01
     21  838  509 (S20E23 L=119)  1266    370        2 ( 744/ 420- 912/ 593) -76.0 E27-E18 S26-S13
     22  737  493 (S19E30 L=112)  1080    217        3 ( 663/ 441- 793/ 563) -14.0 E34-E26 S22-S14
     23  869  317 (S34E29 L=113)  5505    833        8 ( 615/ 167-1200/ 555)  13.9 E81-W00 S44-S24
     24 1568  514 (S38W27 L=170)   480     99        1 (1520/ 476-1607/ 547)  26.6 W23-W31 S40-S36
     25 1527  327 (S54W26 L=168)  1875    185        3 (1442/ 301-1618/ 364) -11.8 W15-W40 S57-S50
  

    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