1 |
clear |
2 |
clear path |
3 |
whos |
4 |
global Nx Ny Nz |
5 |
global lat long dz dm mdep |
6 |
global delt_su su_its t_su delt |
7 |
global descriptor this_path |
8 |
global f deltaf Q beta r_expt r_heat H |
9 |
global time rots it |
10 |
global g Cp rho_bar alpha |
11 |
global u v t w |
12 |
global iterations |
13 |
|
14 |
for iii=1:4, |
15 |
getuvwt; |
16 |
|
17 |
%i=find(t<20.1); |
18 |
%t(i)=NaN; |
19 |
t(1,:,:)=NaN; |
20 |
t(Nx,:,:)=NaN; |
21 |
t(:,:,3)=30; |
22 |
t(:,:,Nz)=NaN; |
23 |
|
24 |
colormap gray |
25 |
cmap=flipud(colormap); |
26 |
colormap(cmap); |
27 |
|
28 |
|
29 |
cmin=20; |
30 |
cmax=30; |
31 |
V=[cmin cmax]; |
32 |
% figure |
33 |
caxis('manual') |
34 |
|
35 |
subplot(4,2,2*iii-1) |
36 |
% title='in-situ temperature at z=5'; |
37 |
imagesc(lat,long,squeeze(t(:,:,5))');shading flat;axis image;caxis(V);colorbar |
38 |
set(gca,'ydir','norm','XTickLabel','|||','YTickLabel',' |||') |
39 |
xlabel('x','FontSize',15) |
40 |
ylabel('y','FontSize',15,'Rotation',[0]) |
41 |
|
42 |
if iii==1 |
43 |
text(-30,110,'a)','FontSize',15) |
44 |
end |
45 |
|
46 |
if iii==2 |
47 |
text(-30,110,'b)','FontSize',15) |
48 |
end |
49 |
|
50 |
if iii==3 |
51 |
text(-30,110,'c)','FontSize',15) |
52 |
end |
53 |
|
54 |
if iii==4 |
55 |
text(-30,110,'d)','FontSize',15) |
56 |
end |
57 |
|
58 |
% text(0,-50,descriptor); |
59 |
% text(0,140,title); |
60 |
% text(0,-30,'timestep');text(80,-30,num2str(it)) |
61 |
subplot(4,2,2*iii) |
62 |
[c,h]=contourf(flipud(squeeze(t(:,Ny/2,3:30))'),7);shading flat;caxis(V);box on; |
63 |
% set(h(:),'LineWidth',[0.001]) |
64 |
% imagesc(lat,long,squeeze(t(:,Ny/2,3:30))');shading flat;axis image;caxis(V); |
65 |
set(gca,'DataAspectRatio',[4,1,1],'XTickLabel','|||','YTickLabel',' |||') |
66 |
xlabel('x','FontSize',15) |
67 |
ylabel('z','FontSize',15,'Rotation',[0]) |
68 |
% text(0,-2,'in-situ east-west temperature at mid-tank') |
69 |
|
70 |
end |