Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1366 1781 (N42W57 L=133)  2192    173        7 (1314/1699-1410/1862)  27.6 W49-W71 N36-N47
      2 1332 1438 (N23W30 L=106)   385    109        1 (1295/1394-1376/1472) -80.5 W27-W31 N19-N25
      3  921 1407 (N32W03 L= 79)   539    105        1 ( 867/1372- 964/1436) -45.0 W00-W05 N28-N34
      4  291 1284 (N37E51 L= 24)   367     53        0 ( 271/1254- 310/1309)  76.0 E54-E49 N34-N38
      5 1302 1249 (N13W21 L= 97)   312    126        0 (1289/1183-1322/1304)  54.5 W19-W24 N09-N16
      6 1518 1244 (N08W35 L=111)   575    190        2 (1453/1206-1598/1291) -41.2 W31-W39 N03-N11
      7  451 1161 (N26E35 L= 41)   268     46        0 ( 437/1137- 467/1192)  56.3 E36-E33 N24-N28
      8 1821 1030 (S13W54 L=130)  1959    255       10 (1757/ 935-1860/1139)  71.6 W48-W59 S19-S07
      9  745 1014 (N12E17 L= 59)   932    421        1 ( 671/ 927- 831/1090)  60.9 E21-E12 N07-N16
     10  301  974 (N17E50 L= 26)  1490    400        3 ( 191/ 901- 446/1045) -25.6 E62-E38 N11-N22
     11 1887 1013 (S16W62 L=138)   575     56        1 (1870/ 991-1908/1039) -45.0 W59-W65 S18-S14
     12 1310  989 (S01W16 L= 91)   193     49        0 (1299/ 955-1320/1022)  56.3 W14-W16 S03-N00
     13 1676  937 (S14W39 L=115)   598    132        3 (1642/ 879-1716/ 986)  45.0 W35-W42 S16-S11
     14 1741  862 (S20W43 L=119)   783    145        1 (1721/ 799-1767/ 933) -90.0 W41-W45 S24-S15
     15 1653  831 (S19W35 L=111)  1145    185        3 (1599/ 776-1700/ 901) -61.4 W31-W39 S24-S13
     16  391  878 (N11E44 L= 32)   328     37        3 ( 365/ 858- 418/ 900)   0.0 E45-E41 N09-N11
     17 1109  675 (S15E03 L= 73)   676    231        0 (1053/ 592-1148/ 790)  51.3 E07-W01 S18-S08
     18 1475  482 (S38W18 L= 94)  6755   1009        8 (1056/ 257-1828/ 711)   7.0 E19-W54 S45-S32
     19  902  559 (S18E18 L= 58)   591    153        0 ( 846/ 535- 974/ 592) -35.5 E20-E13 S19-S14
     20  389  507 (S12E57 L= 19)   855    114        1 ( 340/ 465- 442/ 548) -45.0 E61-E53 S15-S08
     21  307  498 (S12E68 L=  8)   764    112        4 ( 283/ 451- 331/ 529)  56.3 E73-E62 S15-S09
     22  356  458 (S15E65 L= 11)   732     51        1 ( 338/ 429- 374/ 488)  68.2 E68-E61 S17-S12
     23 1307  184 (S62E04 L= 72)   533     44        0 (1283/ 162-1332/ 209) -71.6 E05-E01 S67-S57
  

    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