disp(['prt_jas_gps_', cruise]);
fclose('all');
clear jazz;
%This program takes data computed by the read_gps_day and read_head_day progam and creates an ascii
%file appropriate for reading into a spreadsheet (e.g., lotus, quatropro, etc)

f=[way_proc_data_flux cruise '_proc_gpsnav_1min_' sprintf('%04i_%02i_%02i_%03i',Vdate(1),Vdate(2),Vdate(3),ddd)  '.txt'];

flist=fopen(f,'w');

%take stats data and stick into matrix
jazz(1,1:np)=jd_ref';  %decimal JD
jazz(2,1:np)=gpslat1i'; %decimal latitude, deg
jazz(3,1:np)=gpslon1i'; %decimal longitude, deg
jazz(4,1:np)=gpsspeedi';  %GPS SOG, m/s
jazz(5,1:np)=gpsheadi';  %GPS COG, deg
jazz(6,1:np)=headxi_pitch';  %Crescent GPS heading, deg
jazz(7,1:np)=pitchxi_pitch';  %Crescent GPS angle (pitch), deg
% jazz(8,1:np)=pitchxi_roll';  %Crescent GPS angle (roll), deg
% jazz(9,1:np)=headxi_roll';  %Crescent GPS heading, deg

%vectorized print, 7 columns, up to 1440 rows
fprintf(flist,'%11.5f %9.3f %9.3f %9.3f %9.3f %9.3f %9.3f \r\n',jazz);
fclose('all');
	
