Changeset 87 for trunk/NEMO/OPA_SRC/TRA/zpshde.F90

Timestamp:

2004-04-22T15:41:04+02:00 (20 years ago)

Author:

opalod

Message:

CT : UPDATE057 : # General syntax, alignement, comments corrections

# l_ctl alone replace the set (l_ctl .AND. lwp)
# Add of diagnostics which are activated when using l_ctl logical

File:

• trunk/NEMO/OPA_SRC/TRA/zpshde.F90 (modified) (1 diff)

trunk/NEMO/OPA_SRC/TRA/zpshde.F90

@@ -72 +72 @@
       !!          Idem for di(s) and dj(s)          
       !!
-      !!      For rho, we call eos2d.h which will compute rd~(t~,s~) at 
+      !!      For rho, we call eos_insitu_2d which will compute rd~(t~,s~) at 
       !!      the good depth zh from interpolated T and S for the different
       !!      formulation of the equation of state (eos).