% Jules 2000/11/27

% put the diagnostics in this one; don't call them unless asked for

subtitle_comment = config.comment;
config.comment = '';

whitebg(gcf,'w');clf

config.xlim = [config.start_dd config.start_dd+config.ddrange];
cfg =aplotit(data, config, 'cur_ax', subplot(411), 'fn', 'fabs_sm',...
             'var_range',[-60 60], 'comment', ...
     sprintf('reflayer: %d to %d', config.rl_range(1), config.rl_range(2)));

config.cmap = mk_cmap(35,'jet');
cfg =aplotit(data, config, 'cur_ax', subplot(412), 'fn', 'amp',...      
             'var_range',[30 200]);


data.atbiasp = get_atbiasp(data);
config.minclipval.atbiasp = -40;      
config.maxclipval.atbiasp = 40;
config.title.atbiasp = 'ALONGTRACK BIAS PARAMETER (red-over-blue stripes)';
cfg =aplotit(data, config, 'cur_ax', subplot(413), 'fn', 'atbiasp');

cfg =aplotit(data, config, 'cur_ax', subplot(414), 'fn', 'e');

date_it

subtitle_comment = sprintf('%s (dday %3.1f - %3.1f)',...
                           subtitle_comment, min(data.dday), max(data.dday));
subtitle(subtitle_comment)
