Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1253 1836 (N53E05 L=125)   449     80        1 (1223/1811-1292/1851)  33.7 E07-E01 N50-N56
      2  749 1800 (N36E42 L= 89)   903    114        2 ( 706/1769- 803/1837) -13.0 E48-E35 N34-N39
      3  773 1522 (N17E26 L=105)  2247    529        6 ( 614/1364- 924/1680)  70.2 E31-E21 N05-N30
      4 1247 1620 (N34W01 L=132)   644    190        2 (1154/1579-1321/1657)   5.2 E05-W06 N32-N35
      5  940 1390 (N12E12 L=119)   348    114        0 ( 903/1338- 973/1435) -39.8 E15-E09 N09-N14
      6 1877 1304 (N31W59 L=190)   558     64        1 (1848/1279-1901/1324)   0.0 W54-W63 N29-N32
      7 1832 1273 (N27W52 L=183)   384     22        0 (1812/1248-1846/1297) -56.3 W49-W54 N25-N28
      8 1527 1234 (N16W26 L=157)   514    107        0 (1480/1194-1574/1271) -15.9 W22-W29 N14-N17
      9 1044 1209 (N04E03 L=128)   205     89        0 (1026/1168-1077/1249) -36.9 E04-W00 N01-N05
     10  269 1180 (S10E54 L= 77)   301     51        0 ( 256/1146- 283/1213)  90.0 E54-E52 S12-S08
     11  125 1160 (S13E71 L= 60)   799     53        3 (  96/1131- 150/1184) -12.5 E77-E67 S14-S11
     12 1790 1123 (N16W48 L=179)   415     92        0 (1769/1081-1812/1178)  74.1 W46-W49 N13-N20
     13  597 1125 (S09E27 L=104)   628    231        1 ( 514/1061- 673/1169)  45.0 E31-E22 S13-S05
     14 1860 1097 (N17W56 L=187)   774    136        1 (1842/1023-1876/1158) -54.5 W53-W58 N13-N20
     15 1597 1021 (N05W34 L=165)   654    208        0 (1580/ 920-1610/1128) -65.6 W31-W37 N00-N11
     16  137 1018 (S21E68 L= 63)   437     76        2 ( 112/ 982- 165/1045)  24.0 E72-E63 S23-S19
     17  834  843 (S21E08 L=123)   725    256        3 ( 736/ 797- 937/ 897)  32.5 E13-E02 S24-S16
     18 1162  790 (S17W13 L=144)   232     89        0 (1130/ 775-1206/ 815)  11.3 W10-W15 S18-S15
     19 1622  788 (S07W42 L=173)   245     35        1 (1606/ 764-1640/ 815) -33.7 W40-W43 S07-S05
     20 1594  693 (S12W43 L=174)   578    128        4 (1573/ 636-1624/ 765) -45.0 W39-W46 S15-S08
     21 1622  602 (S17W49 L=180)  1440    369        1 (1508/ 509-1706/ 730)  73.6 W45-W54 S24-S07
     22  498  700 (S36E30 L=101)   989    185        3 ( 399/ 676- 582/ 728)   3.6 E38-E22 S37-S33
     23 1159  646 (S26W17 L=148)   525    175        1 (1090/ 624-1250/ 684)   0.0 W11-W22 S27-S23
     24 1417  356 (S36W49 L=180)   663     62        3 (1382/ 329-1454/ 390)   7.1 W45-W53 S37-S34
  

    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