Changeset 8027
- Timestamp:
- 2017-05-15T18:04:37+02:00 (8 years ago)
- Location:
- trunk/NEMOGCM/NEMO/OPA_SRC
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/OPA_SRC/ZDF/zdfddm_substitute.h90
r4152 r8027 5 5 !! with a constant or 1D or 2D or 3D array, using CPP macro. 6 6 !!---------------------------------------------------------------------- 7 #if defined key_zdfddm 7 #if defined key_zdfddm && ! defined key_offline 8 8 ! 'key_zdfddm' : avs: 3D array defined in zdfddm module 9 9 # define fsavs(i,j,k) avs(i,j,k) -
trunk/NEMOGCM/NEMO/OPA_SRC/trc_oce.F90
r7646 r8027 25 25 26 26 LOGICAL , PUBLIC :: l_co2cpl = .false. !: atmospheric pco2 recieved from oasis 27 LOGICAL , PUBLIC :: l_offline = .false. !: offline passive tracers flag28 INTEGER , PUBLIC :: nn_dttrc !: frequency of step on passive tracers27 LOGICAL , PUBLIC :: l_offline = .false. !: offline passive tracers flag 28 INTEGER , PUBLIC :: nn_dttrc = 1 !: frequency of step on passive tracers 29 29 REAL(wp), PUBLIC :: r_si2 !: largest depth of extinction (blue & 0.01 mg.m-3) (RGB) 30 30 REAL(wp), PUBLIC, SAVE, ALLOCATABLE, DIMENSION(:,:,:) :: etot3 !: light absortion coefficient
Note: See TracChangeset
for help on using the changeset viewer.