/[MITgcm]/MITgcm/pkg/aim_v23/aim_aim2dyn.F
ViewVC logotype

Diff of /MITgcm/pkg/aim_v23/aim_aim2dyn.F

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

revision 1.3 by edhill, Sat Nov 1 03:38:53 2003 UTC revision 1.4 by jmc, Thu Mar 11 14:33:19 2004 UTC
# Line 64  C--   Physics tendency term Line 64  C--   Physics tendency term
64           I2 = i+(j-1)*sNx           I2 = i+(j-1)*sNx
65           Katm = _KD2KA( k )           Katm = _KD2KA( k )
66  C        Planetary boundary layer drag coeff.  C        Planetary boundary layer drag coeff.
67           aim_drag(i,j,bi,bj) = DRAG(I2,3,myThid)           aim_drag(i,j,bi,bj) = DRAG(I2,0,myThid)
68    
69  C        Net temperature tendency  C        Net temperature tendency
70           aim_dTdt(i,j,k,bi,bj) =   TT_LSC(I2,Katm,myThid)           aim_dTdt(i,j,k,bi,bj) =   TT_LSC(I2,Katm,myThid)
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22