/[MITgcm]/MITgcm_contrib/high_res_cube/matlab-grid-generator/bin/permutetiles.m
ViewVC logotype

Annotation of /MITgcm_contrib/high_res_cube/matlab-grid-generator/bin/permutetiles.m

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


Revision 1.1.1.1 - (hide annotations) (download) (vendor branch)
Tue Nov 11 18:08:08 2003 UTC (23 years ago) by cnh
Branch: MAIN, initial
CVS Tags: baseline, HEAD
Changes since 1.1: +0 -0 lines
Checking in work done with Dimitri on high-resolution cube gridding and parallel 
communications. 
   o code is in a contrib experiment for now so we can continue collaborating
     on it. However most code is general and will be moved into main branch once 
     it is fully hardened.
   o There are README files in the contrib root and in the subdirectories that
     explain the contents

1 cnh 1.1 function [a]=permutetiles(b,n)
2     % a=permutetiles(b) shifts the tile data left by n places around the equator
3     %
4     % ie. n=1, tile 2->1, 4->2, 5->4, 1->5, the tiles 3 and 6 get rotated 90 degs.
5    
6     c=b;
7     for k=1:n
8    
9     a(:,:,1)=c(:,:,2);
10     a(:,:,2)=c(end:-1:1,:,4)';
11     a(:,:,3)=c(end:-1:1,:,3)';
12     a(:,:,4)=c(:,:,5);
13     a(:,:,5)=c(:,end:-1:1,1)';
14     a(:,:,6)=c(:,end:-1:1,6)';
15    
16     c=a;
17     end
18     a=c;

  ViewVC Help
Powered by ViewVC 1.1.22