erg2dgps.m

这是国外关于卫星导航方面一书的源代码

% -----------------------------------------------------------------------------
% GPSLab:     ERG2DGPS.M
%
% Storing the results from DGPSLAB.M : 
% time series: double diff. PR - DGPS (DX, DY, DZ, baseline length, Dh)   [lst2dgps.txt]
%
% -----------------------------------------------------------------------------
% (c) iapg 1998-2001 zeb

if ~exist('dgps_is_calc')
   %warndlg(['Ergebnisdatei nicht erstellbar, solange kein DGPS berechnet wurde: '...
   %      'Bitte f黨ren Sie zuerst "DGPS"  -> "berechnen" aus.'] ,...
   %      'GPS Lab: Anwendungsfehler beim Aufruf von ERG2DGPS.M');
   return;
end 

fid=fopen('lst2dgps.txt','wt+');
fprintf(fid,'%15.7f %12.3f %12.3f %12.3f %12.3f %12.3f\n',[(s1epo(:,1))';(delta_x+xs2-xs1);(delta_y+ys2-ys1);(delta_z+zs2-zs1);(bsl);(delta_h)]);
fclose(fid);

% --------------------------------------------------------------------------------
% (c) iapg 1998-2001 zeb