/[MITgcm]/MITgcm_contrib/osse/utils/cart2cyl.m
ViewVC logotype

Diff of /MITgcm_contrib/osse/utils/cart2cyl.m

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

revision 1.1 by afe, Mon Jul 12 23:24:35 2004 UTC revision 1.2 by afe, Tue Jul 13 16:26:51 2004 UTC
# Line 20  NN=size(c); Line 20  NN=size(c);
20  %[x,y] = pol2cart(THETA,RHO);  %[x,y] = pol2cart(THETA,RHO);
21  [theta,rho] = cart2pol(X,Y);  [theta,rho] = cart2pol(X,Y);
22  theta=(theta./(pi*2)+0.5).*size(thetai,2);  theta=(theta./(pi*2)+0.5).*size(thetai,2);
23    rho=max(rhoi)*rho/((x-1)/2);
24  %theta=rot90(theta.*180./pi,-1);  %theta=rot90(theta.*180./pi,-1);
25  %[nx ny nz]=size(c);  %[nx ny nz]=size(c);
26  %nx=theta;ny=rho;  %nx=theta;ny=rho;
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22