Changeset 901 for trunk/NEMO/OPA_SRC/LDF/ldftra_c3d.h90

Timestamp:

2008-04-22T21:16:18+02:00 (16 years ago)

Author:

rblod

Message:

Change ldf computation to take into account the grid anisotropy, see ticket #115

File:

• trunk/NEMO/OPA_SRC/LDF/ldftra_c3d.h90 (modified) (2 diffs)

trunk/NEMO/OPA_SRC/LDF/ldftra_c3d.h90

@@ -45 +45 @@
          IF(lwp) WRITE(numout,*) ' ldf_tra_c3d : 3D eddy diffusivity and eddy induced velocity coefficients'
          IF(lwp) WRITE(numout,*) ' ~~~~~~~~~~~   --  '
+         IF(lwp) WRITE(numout,*) '               Coefficients set to constant'
          IF(lwp) WRITE(numout,*)
       ELSE
@@ -50 +51 @@
          IF(lwp) WRITE(numout,*) ' ldf_tra_c3d : 3D eddy diffusivity coefficient'
          IF(lwp) WRITE(numout,*) ' ~~~~~~~~~~~   -- '
+         IF(lwp) WRITE(numout,*) '               Coefficients set to constant'
          IF(lwp) WRITE(numout,*)
       ENDIF