/[MITgcm]/MITgcm_contrib/timour_matlab/mscripts/plotuv.m
ViewVC logotype

Annotation of /MITgcm_contrib/timour_matlab/mscripts/plotuv.m

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.1 - (hide annotations) (download)
Wed Sep 3 21:22:22 2003 UTC (21 years, 10 months ago) by edhill
Branch: MAIN
CVS Tags: HEAD
initial checkin of Timour's MatLAB scripts

1 edhill 1.1 clear
2     clear path
3    
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    
15     cmin=20;
16     cmax=28;
17     V=[cmin cmax];
18    
19     counter=0;
20     for i=2:8:Nx,
21     counter=counter+1;
22     x(counter)=i;
23     end
24    
25     counter=0;
26     for i=2:4:Ny,
27     counter=counter+1;
28     y(counter)=i;
29     end
30    
31     nz=5
32     caxis('manual')
33     % colormap gray
34     % cmap=flipud(colormap);
35     cmap=zeros(64,3);
36     colormap(cmap);
37    
38     % imagesc(lat,long,squeeze(t(:,:,nz))');shading flat;axis image;caxis(V);
39     contour(squeeze(t(:,:,nz))',21:1:30);shading flat;axis image;caxis(V);
40     % colorbar('horizontal');
41     set(gca,'ydir','norm','FontSize',15,'XtickLabel','|','YTickLabel','|')
42     xlabel('X','FontSize',20)
43     ylabel('Y','FontSize',20,'Rotation',[0])
44     hold on
45    
46     quiver(x,y,u(2:8:Nx,2:4:Ny-2,nz)',v(2:8:Nx,2:4:Ny-2,nz)')
47     % title(['velocity and temperature at the timestep ' num2str(eval(it)) ' level ' int2str(5) ]);
48     hold off

  ViewVC Help
Powered by ViewVC 1.1.22