options.m

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

% -----------------------------------------------------------------------------
% GPSLab: OPTIONS.M           "Parameter Setzen" f黵 die Auswertung von Tr鋑erphasen:
%                             - Elevationsmaske [癩
%                             - Modell f黵 die korrektur der troposph鋜ischen Refraktion:
%                               Modified Hopfield oder Saastamoinen
%                             - Kommentar f黵 die Ergebnisdatei
%
%                             Auswahl setzt die Variablen "el_mask"  (Zahl zwischen 0 und 90), 
%                                                         "trop_typ" (String "mh" oder "sa")
%                                                     und "comment"  (String, beliebig)
%                             im Workspace (keine Optionsdatei !)
%
%                             Dient dem men黦esteuerten Parameter-Setzen von AMFLAB.M
% -----------------------------------------------------------------------------
% (c) iapg 2002 zeb

% Troposph鋜enmodell

what_trop=questdlg('Which Troposphere Correction Model should be used ?', ...
                         'GPS Lab: Select a Troposphere Model -  2002 zeb', ...
                         'Modified Hopfield','Saastamoinen','Modified Hopfield (default)');
   
     switch what_trop,
       case 'Modified Hopfield', 
         trop_typ=('mh');
       case 'Saastamoinen',
         trop_typ=('sa');
       case 'Modified Hopfield (default)',
         errordlg(['Cancel of "Select a Troposphere Model".' ...
            ' Default is Modified Hopfield.'], ...   
         'GPSLab: Cancel -  2002 zeb');
         trop_typ=('mh');
         return;
     end % switch
     
% "what_trop" enth鋖t String f黵 das Trop.korr.modell
     
     
% Elevationsmaske + Kommentarzeile

if ~exist('el_mask')                  % wenn OPTIONS.M noch nicht aufgerufen wurde
   el_mask=10;
end

if ~exist('raster')                   % wenn OPTIONS.M noch nicht aufgerufen wurde
   raster=.01;
end

if ~exist('comment')                  % wenn OPTIONS.M noch nicht aufgerufen wurde
   comment='Project: , Baseline: , Processed by: ';
end

prompt={'Elevation mask [