Changeset 13615
- Timestamp:
- 2020-10-15T17:22:11+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_r13327_KERNEL-06_2_techene_e3/tests/AM98/MY_SRC/usrdef_istate.F90
r13599 r13615 60 60 pv (:,:,:) = 0._wp 61 61 pssh(:,:) = 0._wp 62 ts(:,:,:,:) = 0._wp ! not used in SWE62 pts (:,:,:,:) = 0._wp ! not used in SWE 63 63 64 64 IF(lwp) WRITE(numout,*) "end istate"
Note: See TracChangeset
for help on using the changeset viewer.