get_prevah_coords

 PURPOSE: extract x and y coordinates, elevation as numbers from header 
          info as given from read_prevah_result and read_prevah_input

 Example: [x,y,e,n] = get_prevah_coords(header)

 See also:  read_prevah_result, read_prevah_input

0001 function [x,y,e,n] = get_prevah_coords(header)
0002 % PURPOSE: extract x and y coordinates, elevation as numbers from header
0003 %          info as given from read_prevah_result and read_prevah_input
0004 %
0005 % Example: [x,y,e,n] = get_prevah_coords(header)
0006 %
0007 % See also:  read_prevah_result, read_prevah_input
0008 
0009 c= size(header,2)-4;
0010 x=nan(c,1);
0011 y=x;e=x;
0012 n=cell(c,1);
0013 for i = 5:c+4
0014     x(i-4)=str2num(header{2,i});
0015     y(i-4)=str2num(header{3,i});
0016     e(i-4)=str2num(header{1,i});
0017     n(i-4)=cellstr(header{4,i});
0018 end
0019 
0020