| 16 |
% (and in the horizontal for that matter). |
% (and in the horizontal for that matter). |
| 17 |
if isequal(pst,'Grd') |
if isequal(pst,'Grd') |
| 18 |
if isCS |
if isCS |
| 19 |
merccube(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
merccube_mod(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
| 20 |
else |
else |
| 21 |
imagesc(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
imagesc(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
| 22 |
end |
end |
| 24 |
% Make interpolated plot. |
% Make interpolated plot. |
| 25 |
elseif isequal(pst,'Int') |
elseif isequal(pst,'Int') |
| 26 |
if isCS |
if isCS |
| 27 |
merccube(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
merccube_mod(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
| 28 |
shading interp; |
shading interp; |
| 29 |
else |
else |
| 30 |
pcolor(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
pcolor(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
| 34 |
% Make contour (non-filled) plot. Let MATLAB determine the contour |
% Make contour (non-filled) plot. Let MATLAB determine the contour |
| 35 |
% intervals on a differencing plot. |
% intervals on a differencing plot. |
| 36 |
elseif isequal(pst,'Con') |
elseif isequal(pst,'Con') |
| 37 |
if isequal(cmp,'Dif') |
try [cs,h] = contour(xax{inrow}{incol},yax{inrow}{incol},plotdata,contint); |
| 38 |
[cs,h] = contour(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
catch [cs,h] = contour(xax{inrow}{incol},yax{inrow}{incol},plotdata); end |
| 39 |
else |
set(h,'linewidth',linewidth); |
|
[cs,h]=contour(xax{inrow}{incol},yax{inrow}{incol},plotdata,contint); |
|
|
set(h,'linewidth',linewidth) |
|
|
end |
|
| 40 |
if UseConLabel |
if UseConLabel |
| 41 |
clabel(cs,h,'fontsize',fs_clabel,'rotation',0); |
clabel(cs,h,'fontsize',fs_clabel,'rotation',0); |
| 42 |
end |
end |
| 44 |
% Make contour (filled) plot. Let MATLAB determine the contour |
% Make contour (filled) plot. Let MATLAB determine the contour |
| 45 |
% intervals on a differencing plot. |
% intervals on a differencing plot. |
| 46 |
elseif isequal(pst,'Cnf') |
elseif isequal(pst,'Cnf') |
| 47 |
if isequal(cmp,'Dif') |
try [cs,h] = contourf(xax{inrow}{incol},yax{inrow}{incol},plotdata,contint); |
| 48 |
[cs,h] = contourf(xax{inrow}{incol},yax{inrow}{incol},plotdata); |
catch [cs,h] = contourf(xax{inrow}{incol},yax{inrow}{incol},plotdata); end |
|
else |
|
|
[cs,h] = contourf(xax{inrow}{incol},yax{inrow}{incol},plotdata,contint); |
|
|
end |
|
| 49 |
if UseCnfLabel |
if UseCnfLabel |
| 50 |
clabel(cs,h,'fontsize',fs_clabel,'rotation',0); |
clabel(cs,h,'fontsize',fs_clabel,'rotation',0); |
| 51 |
end |
end |