/[MITgcm]/MITgcm_contrib/high_res_cube/eddy_flux/calcUVBave.m
ViewVC logotype

Diff of /MITgcm_contrib/high_res_cube/eddy_flux/calcUVBave.m

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

revision 1.4 by edhill, Thu Aug 12 18:12:02 2004 UTC revision 1.5 by edhill, Fri Aug 13 01:45:49 2004 UTC
# Line 49  vnam = [ 'U_'; 'V_'; 'T_'; 'S_'; 'B_'; ' Line 49  vnam = [ 'U_'; 'V_'; 'T_'; 'S_'; 'B_'; '
49  il = 1;  il = 1;
50  for il = 1:nlay  for il = 1:nlay
51        
52    %  a = sprintf('Slice: %g',il);    a = sprintf('Slice: %g',il);
53    %  disp(a);    %  disp(a);
54        
55    %  Zero the accumulators    %  Zero the accumulators
56      nm = 0;
57    for io = 1:size(vnam,1)    for io = 1:size(vnam,1)
58      comm = sprintf('%s_acc = zeros(ne,ne,6);', vnam(io,:));      comm = sprintf('%s_acc = zeros(ne,ne,6);', vnam(io,:));
59      eval(comm)      eval(comm)

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

  ViewVC Help
Powered by ViewVC 1.1.22