Changeset 247 for trunk/NEMO/OPA_SRC/ZDF/zdfric.F90
- Timestamp:
- 2005-03-27T20:35:47+02:00 (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/ZDF/zdfric.F90
r16 r247 42 42 # include "domzgr_substitute.h90" 43 43 !!---------------------------------------------------------------------- 44 44 !!---------------------------------------------------------------------- 45 !! OPA 9.0 , LOCEAN-IPSL (2005) 46 !! $Header$ 47 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 48 !!---------------------------------------------------------------------- 45 49 CONTAINS 46 50 … … 90 94 zcoef, zdku, zdkv, zri, z05alp ! temporary scalars 91 95 REAL(wp), DIMENSION(jpi,jpj) :: zwx ! temporary workspace 92 !!----------------------------------------------------------------------93 !! OPA 9.0, LODYC-IPSL (2003)94 !!----------------------------------------------------------------------95 96 96 97 IF( kt == nit000 ) CALL zdf_ric_init ! Initialization (first time-step only)
Note: See TracChangeset
for help on using the changeset viewer.