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 |