function [wc_center,wc] = readWC( filename )
% READWC - Reads a wave curve in XMGR format
%
% Written by:
% -- 
% John L. Weatherwax                2006-05-09
% 
% email: wax@alum.mit.edu
% 
% Please send comments and especially bug reports to the
% above email address.
% 
%-----

fid=fopen(filename);
t_cell = textscan(fid,'%f%f',1); wc_center(1)=t_cell{1}; wc_center(2)=t_cell{2}; clear t_cell; 
dum = textscan(fid,'%s',1); 
t_cell = textscan(fid,'%f%f'); wc(:,1)=t_cell{1}; wc(:,2)=t_cell{2}; clear t_cell; 
fclose(fid);