/[MITgcm]/MITgcm/utils/matlab/contourfv.m
ViewVC logotype

Diff of /MITgcm/utils/matlab/contourfv.m

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

revision 1.1 by adcroft, Wed Nov 21 17:56:43 2001 UTC revision 1.2 by adcroft, Fri Jun 4 17:09:11 2004 UTC
# Line 21  nz=prod(size(z)); Line 21  nz=prod(size(z));
21  if max(size(h)) ~= prod(size(h)) | prod(size(h)) ~= nx  if max(size(h)) ~= prod(size(h)) | prod(size(h)) ~= nx
22   error('H must have dimensions of size(X)');   error('H must have dimensions of size(X)');
23  end  end
24  ndims(squeeze(a))  %ndims(squeeze(a))
25  size(squeeze(a))  %size(squeeze(a))
26  if ndims(squeeze(a)) ~= 2 | sum(size(squeeze(a)) ~= [nx nz])  if ndims(squeeze(a)) ~= 2 | sum(size(squeeze(a)) ~= [nx nz])
27   error('A must have dimensions of size(X) x size(H)');   error('A must have dimensions of size(X) x size(H)');
28  end  end
# Line 30  end Line 30  end
30  % Create extended Z coordinate  % Create extended Z coordinate
31  zz=zeros(1,nz+2);  zz=zeros(1,nz+2);
32  zz(2:nz+1)=z;  zz(2:nz+1)=z;
33  zz(1)=0;  zz(1)=max(0,z(1));
34  zz(nz+2)=1.5*z(nz)-0.5*z(nz-1);  zz(nz+2)=1.5*z(nz)-0.5*z(nz-1);
35    
36  [Z,X]=meshgrid(zz,x);  [Z,X]=meshgrid(zz,x);

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

  ViewVC Help
Powered by ViewVC 1.1.22