Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1793 1480 (N11W72 L=273)   705     41        0 (1768/1461-1820/1496)   0.0 W66-W77 N09-N12
      2  432 1344 (N39E36 L=166)   288    105        0 ( 383/1332- 484/1353) -11.3 E40-E30 N37-N39
      3 1609 1164 (N00W39 L=241)  1338    332        1 (1539/1024-1723/1219)  12.5 W30-W48 S05-N02
      4  381 1172 (N29E41 L=161)   765    190        2 ( 290/1136- 457/1199)   0.0 E49-E33 N27-N30
      5 1838  992 (S16W55 L=257)  2972    299        9 (1771/ 842-1901/1088)  36.3 W47-W65 S24-S11
      6 1920 1031 (S17W67 L=269)   691     89        2 (1896/ 989-1941/1074)  68.2 W63-W72 S20-S15
      7  139 1043 (N24E70 L=132)  1679     93        2 (  88/1008- 175/1073)   3.0 E83-E64 N21-N25
      8  644  988 (N13E23 L=178)   198     73        0 ( 609/ 965- 674/1016)  21.8 E25-E20 N12-N14
      9  196  955 (N18E62 L=140)   450     63        1 ( 182/ 916- 217/ 985) -90.0 E64-E59 N16-N20
     10 1323  897 (S07W14 L=216)   324    133        1 (1281/ 843-1373/ 942)  33.7 W10-W18 S09-S05
     11 1149  827 (S07W03 L=204)   552    196        0 (1114/ 784-1216/ 903) -71.6 W00-W05 S10-S01
     12  539  797 (N04E34 L=167)   289     97        1 ( 491/ 777- 582/ 815)   0.0 E37-E31 N02-N05
     13 1235  699 (S16W05 L=207)   993    396        4 (1108/ 573-1360/ 794)  21.3 E05-W14 S21-S13
     14 1471  742 (S20W20 L=222)   507     96        4 (1433/ 700-1507/ 774)  26.6 W17-W23 S21-S17
     15 1128  723 (S12E01 L=201)   382    107        1 (1085/ 674-1164/ 772)  38.7 E04-W02 S14-S10
     16  235  728 (N04E63 L=139)   420     52        0 ( 215/ 706- 262/ 757) -45.0 E64-E60 N02-N06
     17  827  705 (S07E19 L=183)   212     51        2 ( 799/ 680- 853/ 729) -18.4 E20-E17 S08-S05
     18  685  665 (S06E28 L=173)   354     46        1 ( 658/ 635- 705/ 694) -90.0 E29-E26 S08-S04
     19  966  649 (S13E12 L=190)   220     69        1 ( 932/ 618- 996/ 678)  14.0 E14-E10 S14-S11
     20  762  657 (S08E24 L=178)   262     60        1 ( 731/ 627- 784/ 676) -63.4 E25-E22 S10-S06
     21  685  555 (S13E32 L=170)  1385    240        5 ( 615/ 489- 770/ 624) -84.3 E37-E26 S17-S07
     22  332  549 (S08E61 L=141)   395    105        0 ( 312/ 502- 364/ 591)  81.9 E62-E59 S11-S04
     23  664  466 (S18E37 L=165)  1626    308        5 ( 553/ 413- 799/ 517) -13.2 E44-E26 S21-S14
     24  874  373 (S29E27 L=175)  1136    348        0 ( 764/ 279-1004/ 494)  21.8 E39-E14 S34-S23
     25  574  322 (S27E53 L=149)  2259    259        1 ( 497/ 211- 619/ 424)  48.4 E67-E48 S36-S18
     26  651  361 (S25E44 L=158)   512     58        1 ( 622/ 339- 687/ 386) -26.6 E46-E41 S26-S23
     27  524  299 (S28E61 L=141)  1812    113        4 ( 472/ 255- 568/ 330) -63.4 E68-E55 S31-S24
  

    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