Changeset 6914 for branches/2016/dev_r6409_SIMPLIF_2_usrdef/NEMOGCM/CONFIG/LOCK_EXCHANGE/MY_SRC/usrdef_istate.F90

Timestamp:

2016-09-06T13:27:38+02:00 (8 years ago)

Author:

gm

Message:

#1692 - branch SIMPLIF_2_usrdef: final adjustment of OVERFLOW and LOCK-ECHANGE configuration

File:

• branches/2016/dev_r6409_SIMPLIF_2_usrdef/NEMOGCM/CONFIG/LOCK_EXCHANGE/MY_SRC/usrdef_istate.F90 (modified) (3 diffs)

branches/2016/dev_r6409_SIMPLIF_2_usrdef/NEMOGCM/CONFIG/LOCK_EXCHANGE/MY_SRC/usrdef_istate.F90

@@ -37 +37 @@
       !! 
       !! ** Purpose :   Initialization of the dynamics and tracers
-      !!                Here LOCK_EXCHANGE configuration example 
+      !!                Here LOCK_EXCHANGE configuration 
       !!
       !! ** Method  : - set temprature field
@@ -59 +59 @@
       IF(lwp) WRITE(numout,*) '                 (i.e. a temperature difference of 25 degrees with rn_a0 = 0.2'
       !
-      !  rn_a0 =  2.e-1   !  thermal expension coefficient (nn_eos= 1)
+      !  rn_a0 =  0.2   !  thermal expension coefficient (nn_eos= 1)
       !  rho = rau0 - rn_a0 * (T-10) 
       !  delta_T = 25 degrees  ==>>  delta_rho = 25 * rn_a0 = 5 kg/m3
@@ -68 +68 @@
       !
       !                          ! T & S profiles
-      zdam = 32.                      ! in kilometers
+      zdam = 32.                      ! density front position in kilometers
       pts(:,:,:,jp_tem) = 30._wp * ptmask(:,:,:)
       DO jk = 1, jpkm1