Changeset 14842
- Timestamp:
- 2021-05-11T15:17:26+02:00 (3 years ago)
- Location:
- NEMO/trunk/src
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OCE/module_example.F90
r14834 r14842 187 187 CONTAINS 188 188 SUBROUTINE exa_mpl( kt, pvar1, pvar2, ptab ) ! Empty routine 189 REAL:: ptab(:,:) 189 INTEGER :: kt 190 REAL:: pvar1, pvar2, ptab(:,:) 190 191 WRITE(*,*) 'exa_mpl: You should not have seen this print! error?', kt, pvar1, pvar2, ptab(1,1) 191 192 END SUBROUTINE exa_mpl -
NEMO/trunk/src/TOP/AGE/trcnam_age.F90
r12377 r14842 53 53 ln_trc_cbc(jp_age) = .false. 54 54 ln_trc_obc(jp_age) = .false. 55 ln_trc_ais(jp_age) = .false. 55 56 ! 56 57 READ ( numnat_ref, namage, IOSTAT = ios, ERR = 901)
Note: See TracChangeset
for help on using the changeset viewer.