Changeset 10322 for NEMO/branches/UKMO/dev_r9950_GO8_package/src/OCE/IOM
- Timestamp:
- 2018-11-16T16:06:47+01:00 (5 years ago)
- Location:
- NEMO/branches/UKMO/dev_r9950_GO8_package/src/OCE/IOM
- Files:
-
- 6 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/UKMO/dev_r9950_GO8_package/src/OCE/IOM/in_out_manager.F90
r9953 r10322 161 161 !! NEMO/OCE 4.0 , NEMO Consortium (2018) 162 162 !! $Id$ 163 !! Software governed by the CeCILL licen ce (./LICENSE)163 !! Software governed by the CeCILL license (see ./LICENSE) 164 164 !!===================================================================== 165 165 END MODULE in_out_manager -
NEMO/branches/UKMO/dev_r9950_GO8_package/src/OCE/IOM/iom.F90
r10320 r10322 43 43 USE ioipsl, ONLY : ju2ymds ! for calendar 44 44 USE crs ! Grid coarsening 45 #if defined key_top 46 USE trc, ONLY : profsed 47 #endif 45 48 USE lib_fortran 46 49 USE diurnal_bulk, ONLY : ln_diurnal_only, ln_diurnal … … 87 90 !! NEMO/OCE 4.0 , NEMO Consortium (2018) 88 91 !! $Id$ 89 !! Software governed by the CeCILL licen ce (./LICENSE)92 !! Software governed by the CeCILL license (see ./LICENSE) 90 93 !!---------------------------------------------------------------------- 91 94 CONTAINS … … 193 196 ! vertical grid definition 194 197 IF(.NOT.llrst_context) THEN 195 CALL iom_set_axis_attr( "deptht", paxis = gdept_1d )196 CALL iom_set_axis_attr( "depthu", paxis = gdept_1d )197 CALL iom_set_axis_attr( "depthv", paxis = gdept_1d )198 CALL iom_set_axis_attr( "depthw", paxis = gdepw_1d )198 CALL iom_set_axis_attr( "deptht", paxis = gdept_1d ) 199 CALL iom_set_axis_attr( "depthu", paxis = gdept_1d ) 200 CALL iom_set_axis_attr( "depthv", paxis = gdept_1d ) 201 CALL iom_set_axis_attr( "depthw", paxis = gdepw_1d ) 199 202 200 203 ! Add vertical grid bounds … … 219 222 CALL iom_set_axis_attr( "nstrait", (/ (REAL(ji,wp), ji=1,4) /) ) 220 223 # endif 224 #if defined key_top 225 CALL iom_set_axis_attr( "profsed", paxis = profsed ) 226 #endif 221 227 CALL iom_set_axis_attr( "icbcla", class_num ) 222 228 CALL iom_set_axis_attr( "iax_20C", (/ REAL(20,wp) /) ) -
NEMO/branches/UKMO/dev_r9950_GO8_package/src/OCE/IOM/iom_def.F90
r9950 r10322 85 85 !! NEMO/OCE 4.0 , NEMO Consortium (2018) 86 86 !! $Id$ 87 !! Software governed by the CeCILL licen ce (./LICENSE)87 !! Software governed by the CeCILL license (see ./LICENSE) 88 88 !!====================================================================== 89 89 END MODULE iom_def -
NEMO/branches/UKMO/dev_r9950_GO8_package/src/OCE/IOM/iom_nf90.F90
r9950 r10322 48 48 !! NEMO/OCE 4.0 , NEMO Consortium (2018) 49 49 !! $Id$ 50 !! Software governed by the CeCILL licen ce (./LICENSE)50 !! Software governed by the CeCILL license (see ./LICENSE) 51 51 !!---------------------------------------------------------------------- 52 52 CONTAINS -
NEMO/branches/UKMO/dev_r9950_GO8_package/src/OCE/IOM/prtctl.F90
r9950 r10322 37 37 !! NEMO/OCE 4.0 , NEMO Consortium (2018) 38 38 !! $Id$ 39 !! Software governed by the CeCILL licen ce (./LICENSE)39 !! Software governed by the CeCILL license (see ./LICENSE) 40 40 !!---------------------------------------------------------------------- 41 41 CONTAINS -
NEMO/branches/UKMO/dev_r9950_GO8_package/src/OCE/IOM/restart.F90
r9953 r10322 43 43 !! NEMO/OCE 4.0 , NEMO Consortium (2018) 44 44 !! $Id$ 45 !! Software governed by the CeCILL licen ce (./LICENSE)45 !! Software governed by the CeCILL license (see ./LICENSE) 46 46 !!---------------------------------------------------------------------- 47 47 CONTAINS
Note: See TracChangeset
for help on using the changeset viewer.