Parent Directory | Revision Log | Revision Graph | Patch
revision 1.3 by jmc, Wed Aug 15 13:40:40 2001 UTC | revision 1.4 by adcroft, Tue Aug 28 18:16:40 2001 UTC | |
---|---|---|
# | Line 17 function [U,V] = uvcube2latlon(LON,LAT,u | Line 17 function [U,V] = uvcube2latlon(LON,LAT,u |
17 | % | % |
18 | % $Header$ | % $Header$ |
19 | ||
20 | NN=size(u); | |
21 | [nnx ny nz]=size(u); | [nnx ny nz]=size(u); |
22 | ||
23 | U=reshape(u,[ny 6 ny nz]); | U=reshape(u,[ny 6 ny nz]); |
# | Line 50 for k=1:6; | Line 51 for k=1:6; |
51 | end | end |
52 | end | end |
53 | ||
54 | U=reshape(U,[nnx ny nz]); | U=reshape(U,[nnx NN(2:end)]); |
55 | V=reshape(V,[nnx ny nz]); | V=reshape(V,[nnx NN(2:end)]); |
56 | ||
57 | % xc=-179:2:179; | % xc=-179:2:179; |
58 | % yc=-89:2:89; | % yc=-89:2:89; |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |