Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1328 1677 (N46W32 L=188)   652     83        3 (1287/1647-1363/1706) -51.3 W29-W36 N43-N48
      2 1224 1677 (N47W22 L=178)   444    100        0 (1197/1638-1264/1697)  20.6 W18-W26 N44-N48
      3 1593 1663 (N42W61 L=217)   732     83        1 (1549/1639-1631/1686) -18.4 W56-W66 N40-N44
      4  188 1362 (N26E75 L= 80)  1017    142        0 ( 154/1306- 217/1424)  63.4 E79-E71 N22-N30
      5  560 1389 (N29E32 L=123)   249     49        1 ( 543/1360- 574/1413) -63.4 E34-E30 N26-N30
      6  848 1305 (N22E10 L=145)   661    175        2 ( 796/1245- 921/1339)  32.0 E13-E05 N18-N24
      7  423 1298 (N23E42 L=113)   289     75        0 ( 394/1273- 448/1331) -31.0 E45-E39 N21-N24
      8  275 1281 (N21E57 L= 99)   359     89        0 ( 263/1235- 289/1322) -71.6 E58-E56 N18-N24
      9 1499 1274 (N17W33 L=189)   292     64        2 (1482/1237-1515/1307)  68.2 W32-W34 N14-N19
     10 1799  942 (S06W55 L=211)   820    133        6 (1756/ 895-1838/ 997)  26.6 W51-W60 S08-S02
     11 1493  907 (S05W29 L=185)   686    252        3 (1417/ 845-1546/ 980) -45.0 W24-W33 S09-N00
     12 1156  811 (S09W07 L=163)   956    427        4 ( 995/ 756-1302/ 888) -21.3 E02-W16 S13-S04
     13 1821  793 (S15W60 L=215)   556     58        2 (1796/ 764-1841/ 828)  45.0 W56-W62 S17-S13
     14  299  718 (S13E55 L=101)  2233    356        9 ( 195/ 637- 441/ 801) -24.4 E66-E42 S18-S08
     15  528  719 (S13E34 L=121)   596    165        2 ( 481/ 665- 581/ 793)  48.8 E38-E29 S16-S08
     16 1124  715 (S15W05 L=161)   705    289        2 ( 980/ 662-1230/ 744)  -8.1 E03-W11 S18-S12
     17 1489  623 (S24W31 L=186)  1532    301        4 (1392/ 516-1578/ 716)  47.5 W24-W37 S30-S17
     18 1109  631 (S21W04 L=159)   226     42        0 (1076/ 617-1134/ 646)   0.0 W01-W05 S21-S19
     19  322  532 (S26E61 L= 95)  1082    101        2 ( 303/ 480- 342/ 594)  42.0 E67-E55 S30-S21
     20 1458  462 (S35W31 L=187)   302     90        0 (1414/ 429-1494/ 481)  26.6 W27-W34 S37-S33
     21  612  301 (S45E44 L=112)   447     34        0 ( 589/ 283- 641/ 317)   0.0 E47-E40 S46-S43
     22 1254  251 (S53W18 L=174)   392     34        1 (1234/ 227-1269/ 277) -78.7 W16-W20 S55-S50
     23 1356  212 (S60W36 L=191)  1584    157        2 (1307/ 170-1400/ 253) -22.4 W25-W59 S67-S53
  

    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