Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1364 1775 (N42W56 L=132)  2078    157        3 (1314/1697-1410/1849)  31.4 W49-W67 N36-N47
      2 1320 1442 (N24W29 L=105)   396     60        1 (1292/1416-1354/1472) -63.4 W27-W30 N21-N26
      3  917 1404 (N32W02 L= 79)   567     90        1 ( 861/1366- 956/1432) -38.7 E01-W04 N28-N34
      4  287 1283 (N37E52 L= 24)   339     40        1 ( 269/1257- 308/1306)  76.0 E54-E49 N34-N38
      5 1295 1241 (N13W21 L= 97)   360    123        0 (1281/1178-1315/1298)  56.3 W19-W23 N09-N16
      6 1521 1238 (N07W35 L=111)   548    173        2 (1450/1203-1593/1266) -41.2 W30-W39 N03-N10
      7  446 1157 (N26E36 L= 41)   281     35        0 ( 428/1135- 462/1185) -90.0 E37-E34 N24-N28
      8 1815 1016 (S13W53 L=129)  1763    203        5 (1754/ 940-1859/1095) -54.0 W48-W58 S19-S08
      9  737 1011 (N12E17 L= 59)  1009    419        0 ( 663/ 925- 824/1086) -21.8 E22-E12 N07-N16
     10  303  969 (N17E50 L= 26)  1499    385        2 ( 188/ 897- 455/1044) -24.6 E62-E37 N10-N22
     11 1886 1010 (S16W62 L=138)   579     60        1 (1867/ 985-1906/1037) -45.0 W58-W64 S18-S14
     12 1304  985 (S01W15 L= 91)   225     44        0 (1292/ 951-1314/1020)  33.7 W13-W16 S03-N00
     13 1670  933 (S14W38 L=115)   679    140        3 (1638/ 873-1710/ 984)  39.8 W35-W42 S16-S11
     14 1734  897 (S18W43 L=119)   370     40        0 (1718/ 867-1748/ 932)  63.4 W41-W44 S19-S15
     15 1774  857 (S22W47 L=123)   967    200        4 (1719/ 781-1833/ 925)  22.6 W41-W53 S24-S18
     16 1647  828 (S19W35 L=111)  1188    186        3 (1593/ 776-1696/ 901) -59.0 W31-W39 S23-S13
     17  387  876 (N10E44 L= 32)   357     44        1 ( 362/ 855- 417/ 898)  11.3 E46-E41 N09-N11
     18  601  727 (S02E32 L= 44)   225     45        0 ( 576/ 702- 623/ 749) -56.3 E33-E30 S03-N00
     19 1087  647 (S16E05 L= 71)   767    222        0 (1005/ 567-1143/ 735)  38.7 E11-W00 S19-S11
     20 1473  481 (S38W18 L= 94)  7079   1037        9 (1054/ 256-1832/ 713)   7.7 E20-W55 S45-S31
     21  895  557 (S18E18 L= 58)   656    138        0 ( 838/ 533- 969/ 588) -35.5 E21-E14 S19-S14
     22  389  503 (S12E57 L= 19)   936    140        0 ( 341/ 449- 440/ 546) -74.1 E61-E54 S16-S09
     23  329  477 (S14E67 L= 10)  1982    177        3 ( 277/ 420- 378/ 530) -63.4 E76-E61 S17-S09
  

    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