Changeset 2795 for branches/2011/dev_r2787_NOCS_NEPTUNE/NEMOGCM
- Timestamp:
- 2011-07-07T15:21:12+02:00 (13 years ago)
- Location:
- branches/2011/dev_r2787_NOCS_NEPTUNE/NEMOGCM
- Files:
-
- 1 added
- 7 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2011/dev_r2787_NOCS_NEPTUNE/NEMOGCM/CONFIG/GYRE/EXP00/namelist
r2715 r2795 863 863 salfixmin = -9999 ! Minimum salinity after applying the increments 864 864 / 865 !----------------------------------------------------------------------- 866 &nam_dynnept ! Neptune effect (simplified: lateral and vertical diffusions removed) 867 !----------------------------------------------------------------------- 868 ln_neptsimp = .false. ! yes/no use simplified neptune 869 870 ln_smoothtopo = .false. ! yes/no smooth tsu, tsv 871 rn_tslse = 1.2e4 ! value of L at the equator 872 rn_tslsp = 3.0e3 ! value of L at the pole 873 / -
branches/2011/dev_r2787_NOCS_NEPTUNE/NEMOGCM/CONFIG/ORCA2_LIM/EXP00/namelist
r2715 r2795 863 863 salfixmin = -9999 ! Minimum salinity after applying the increments 864 864 / 865 !----------------------------------------------------------------------- 866 &nam_dynnept ! Neptune effect (simplified: lateral and vertical diffusions removed) 867 !----------------------------------------------------------------------- 868 ln_neptsimp = .false. ! yes/no use simplified neptune 869 870 ln_smoothtopo = .false. ! yes/no smooth tsu, tsv 871 rn_tslse = 1.2e4 ! value of L at the equator 872 rn_tslsp = 3.0e3 ! value of L at the pole 873 / -
branches/2011/dev_r2787_NOCS_NEPTUNE/NEMOGCM/CONFIG/ORCA2_LIM/cpp_ORCA2_LIM.fcm
r2670 r2795 1 bld::tool::fppkeys key_ trabbl key_vectopt_loop key_orca_r2 key_lim2 key_dynspg_flt key_diaeiv key_ldfslp key_traldf_c2d key_traldf_eiv key_dynldf_c3d key_dtatem key_dtasal key_tradmp key_zdftke key_zdfddm key_zdftmx key_iomput1 bld::tool::fppkeys key_mpp_mpi key_trabbl key_vectopt_loop key_orca_r2 key_lim2 key_dynspg_flt key_diaeiv key_ldfslp key_traldf_c2d key_traldf_eiv key_dynldf_c3d key_dtatem key_dtasal key_tradmp key_zdftke key_zdfddm key_zdftmx key_iomput -
branches/2011/dev_r2787_NOCS_NEPTUNE/NEMOGCM/CONFIG/ORCA2_OFF_PISCES/EXP00/namelist
r2715 r2795 878 878 salfixmin = -9999 ! Minimum salinity after applying the increments 879 879 / 880 !----------------------------------------------------------------------- 881 &nam_dynnept ! Neptune effect (simplified: lateral and vertical diffusions removed) 882 !----------------------------------------------------------------------- 883 ln_neptsimp = .false. ! yes/no use simplified neptune 884 885 ln_smoothtopo = .false. ! yes/no smooth tsu, tsv 886 rn_tslse = 1.2e4 ! value of L at the equator 887 rn_tslsp = 3.0e3 ! value of L at the pole 888 / -
branches/2011/dev_r2787_NOCS_NEPTUNE/NEMOGCM/CONFIG/POMME/EXP00/namelist
r2650 r2795 868 868 salfixmin = -9999 ! Minimum salinity after applying the increments 869 869 / 870 !----------------------------------------------------------------------- 871 &nam_dynnept ! Neptune effect (simplified: lateral and vertical diffusions removed) 872 !----------------------------------------------------------------------- 873 ln_neptsimp = .false. ! yes/no use simplified neptune 874 875 ln_smoothtopo = .false. ! yes/no smooth tsu, tsv 876 rn_tslse = 1.2e4 ! value of L at the equator 877 rn_tslsp = 3.0e3 ! value of L at the pole 878 / -
branches/2011/dev_r2787_NOCS_NEPTUNE/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90
r2715 r2795 66 66 USE c1d ! 1D configuration 67 67 USE step_c1d ! Time stepping loop for the 1D configuration 68 USE dynnept ! simplified form of Neptune effect 68 69 #if defined key_top 69 70 USE trcini ! passive tracer initialisation … … 296 297 IF( lk_obc ) CALL obc_init ! Open boundaries 297 298 IF( lk_bdy ) CALL bdy_init ! Unstructured open boundaries 299 300 CALL flush(numout) 301 CALL dyn_nept_init ! simplified form of Neptune effect 302 CALL flush(numout) 298 303 299 304 CALL istate_init ! ocean initial state (Dynamics and tracers) -
branches/2011/dev_r2787_NOCS_NEPTUNE/NEMOGCM/NEMO/OPA_SRC/step.F90
r2715 r2795 36 36 #endif 37 37 USE asminc ! assimilation increments (tra_asm_inc, dyn_asm_inc routines) 38 USE dynnept ! simplified form of Neptune effect 38 39 39 40 IMPLICIT NONE … … 220 221 IF( ln_asmiau .AND. & 221 222 & ln_dyninc ) CALL dyn_asm_inc( kstp ) ! apply dynamics assimilation increment 223 IF( ln_neptsimp ) CALL dyn_cor_topo( kstp ) ! subtract Neptune velocities (simplified) 222 224 CALL dyn_adv( kstp ) ! advection (vector or flux form) 223 225 CALL dyn_vor( kstp ) ! vorticity term including Coriolis 224 226 CALL dyn_ldf( kstp ) ! lateral mixing 227 IF( ln_neptsimp ) CALL dyn_cor_topo( kstp ) ! add Neptune velocities (simplified) 225 228 #if defined key_agrif 226 229 IF(.NOT. Agrif_Root()) CALL Agrif_Sponge_dyn ! momemtum sponge
Note: See TracChangeset
for help on using the changeset viewer.