--- MITgcm/model/src/dynamics.F 2008/10/20 23:51:39 1.140 +++ MITgcm/model/src/dynamics.F 2009/02/13 21:56:48 1.141 @@ -1,4 +1,4 @@ -C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/src/dynamics.F,v 1.140 2008/10/20 23:51:39 jmc Exp $ +C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/src/dynamics.F,v 1.141 2009/02/13 21:56:48 heimbach Exp $ C $Name: $ #include "PACKAGES_CONFIG.h" @@ -336,7 +336,7 @@ #ifdef ALLOW_AUTODIFF_TAMC CADJ STORE wvel (:,:,:,bi,bj) = -CADJ & comlev1_bibj, key = idynkey, byte = isbyte +CADJ & comlev1_bibj, key=idynkey, byte=isbyte #endif /* ALLOW_AUTODIFF_TAMC */ C-- Explicit part of the Surface Potentiel Gradient (add in TIMESTEP)