- Timestamp:
- 2015-11-13T08:01:08+01:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2015/dev_r5836_NOC3_vvl_by_default/NEMOGCM/NEMO/OPA_SRC/TRA/tradmp.F90
r5845 r5883 31 31 USE dtatsd ! data: temperature & salinity 32 32 USE zdfmxl ! vertical physics: mixed layer depth 33 ! 33 34 USE in_out_manager ! I/O manager 34 35 USE lib_mpp ! MPP library … … 41 42 PRIVATE 42 43 43 PUBLIC tra_dmp ! routinecalled by step.F9044 PUBLIC tra_dmp_init ! routinecalled by nemogcm.F9044 PUBLIC tra_dmp ! called by step.F90 45 PUBLIC tra_dmp_init ! called by nemogcm.F90 45 46 46 47 ! !!* Namelist namtra_dmp : T & S newtonian damping * … … 88 89 !! below the well mixed layer (nlmdmp=2) 89 90 !! 90 !! ** Action : - (ta,sa)tracer trends updated with the damping trend91 !! ** Action : - tsa: tracer trends updated with the damping trend 91 92 !!---------------------------------------------------------------------- 92 93 INTEGER, INTENT(in) :: kt ! ocean time-step index … … 176 177 !!---------------------------------------------------------------------- 177 178 INTEGER :: ios, imask ! local integers 178 ! !179 ! 179 180 NAMELIST/namtra_dmp/ ln_tradmp, nn_zdmp, cn_resto 180 181 !!---------------------------------------------------------------------- … … 228 229 END SUBROUTINE tra_dmp_init 229 230 231 !!====================================================================== 230 232 END MODULE tradmp
Note: See TracChangeset
for help on using the changeset viewer.