Changeset 5845 for branches/2015/dev_r5836_NOC3_vvl_by_default/NEMOGCM/NEMO/TOP_SRC/PISCES/P4Z/p4zche.F90
- Timestamp:
- 2015-10-31T08:40:45+01:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2015/dev_r5836_NOC3_vvl_by_default/NEMOGCM/NEMO/TOP_SRC/PISCES/P4Z/p4zche.F90
r5836 r5845 164 164 REAL(wp) :: devk55 = 0.3692E-3 165 165 166 !! * Substitutions167 # include "domzgr_substitute.h90"168 166 !!---------------------------------------------------------------------- 169 167 !! NEMO/TOP 3.3 , NEMO Consortium (2010) … … 244 242 245 243 246 247 244 ! CHEMICAL CONSTANTS - DEEP OCEAN 248 245 ! ------------------------------- … … 252 249 253 250 ! SET PRESSION 254 zpres = 1.025e-1 * fsdept(ji,jj,jk)251 zpres = 1.025e-1 * gdept_n(ji,jj,jk) 255 252 256 253 ! SET ABSOLUTE TEMPERATURE
Note: See TracChangeset
for help on using the changeset viewer.