Changeset 281 for trunk/NEMO/TOP_SRC
- Timestamp:
- 2005-09-22T12:17:53+02:00 (19 years ago)
- Location:
- trunk/NEMO/TOP_SRC
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/TOP_SRC/SMS/sms_age.h90
r274 r281 24 24 REAL tauage1, tauage2 25 25 26 COMMON/cotage/ tauage1, tauage227 26 !! 28 27 #endif -
trunk/NEMO/TOP_SRC/TRP/trctrp_ctl.F90
r274 r281 312 312 l_trczdf_imp = .TRUE. 313 313 #else 314 IF( l n_zdfexp ) THEN314 IF( l_trazdf_exp ) THEN 315 315 l_trczdf_exp = .TRUE. ! use explicit scheme 316 316 l_trczdf_imp = .FALSE. -
trunk/NEMO/TOP_SRC/oce_trc.F90
r274 r281 118 118 lk_dynspg_fsc_tsk => lk_dynspg_fsc_tsk !: free surface constant volume flag 119 119 120 USE zdf_oce, ONLY : &121 ln_zdfnpc => ln_zdfnpc !: convection: non-penetrative convection flag122 123 120 #if defined key_partial_steps 124 121 !! Partial steps ('key_partial_steps') … … 234 231 !! vertical diffusion 235 232 USE zdf_oce , ONLY : & 236 avt => avt , & !: vert. diffusivity coef. at w-point for temp 237 avt0 => avt0 !: vertical eddy diffusivity for tracers (m2/s) 233 avt => avt , & !: vert. diffusivity coef. at w-point for temp 234 avt0 => avt0 , & !: vertical eddy diffusivity for tracers (m2/s) 235 ln_zdfnpc => ln_zdfnpc , & !: convection: non-penetrative convection flag 236 l_trazdf_exp => l_trazdf_exp !: explicit vertical diffusion scheme flag 237 238 238 239 239 #if defined key_zdfddm
Note: See TracChangeset
for help on using the changeset viewer.