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

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

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

revision 1.3 by adcroft, Thu Aug 30 13:49:52 2001 UTC revision 1.4 by adcroft, Thu Aug 30 14:00:21 2001 UTC
# Line 34  end Line 34  end
34  Q=C;  Q=C;
35    
36  if ndims(X)==2 & size(X,1)==6*size(X,2)  if ndims(X)==2 & size(X,1)==6*size(X,2)
  disp('1');  
37   [nx ny nt]=size(X);   [nx ny nt]=size(X);
38   X=permute( reshape(X,[nx/6 6 ny]),[1 3 2]);   X=permute( reshape(X,[nx/6 6 ny]),[1 3 2]);
39   Y=permute( reshape(Y,[nx/6 6 ny]),[1 3 2]);   Y=permute( reshape(Y,[nx/6 6 ny]),[1 3 2]);
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22