/[MITgcm]/MITgcm_contrib/gael/matlab_class/gcmfaces_smooth/diffsmooth2D.m
ViewVC logotype

Diff of /MITgcm_contrib/gael/matlab_class/gcmfaces_smooth/diffsmooth2D.m

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

revision 1.1 by gforget, Wed Feb 10 14:48:13 2010 UTC revision 1.2 by gforget, Sun Feb 14 17:29:28 2010 UTC
# Line 29  smooth2D_Kvy=dyCsm.*dyCsm/smooth2D_T/2; Line 29  smooth2D_Kvy=dyCsm.*dyCsm/smooth2D_T/2;
29  FLD=fld;  FLD=fld;
30    
31  for it=1:smooth2D_nbt;  for it=1:smooth2D_nbt;
32      if mod(it,ceil(smooth2D_nbt/50))==0; fprintf([num2str(it) '/' num2str(smooth2D_nbt) ' done\n']); end;  %    if mod(it,ceil(smooth2D_nbt/50))==0; fprintf([num2str(it) '/' num2str(smooth2D_nbt) ' done\n']); end;
33    
34      [dTdxAtU,dTdyAtV]=calc_T_grad(FLD,0);      [dTdxAtU,dTdyAtV]=calc_T_grad(FLD,0);
35      tmpU=dTdxAtU.*smooth2D_Kux;      tmpU=dTdxAtU.*smooth2D_Kux;
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22