Changeset 15540 for NEMO/branches/2021/dev_r14116_HPC-10_mcastril_Mixed_Precision_implementation/src/OCE/DOM/istate.F90
- Timestamp:
- 2021-11-26T12:27:56+01:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2021/dev_r14116_HPC-10_mcastril_Mixed_Precision_implementation/src/OCE/DOM/istate.F90
r14986 r15540 68 68 REAL(wp), DIMENSION(jpi,jpj,jpk) :: zgdept ! 3D table for qco substitute 69 69 !!gm see comment further down 70 REAL( wp), ALLOCATABLE, DIMENSION(:,:,:,:) :: zuvd ! U & V data workspace70 REAL(dp), ALLOCATABLE, DIMENSION(:,:,:,:) :: zuvd ! U & V data workspace 71 71 !!gm end 72 72 !!----------------------------------------------------------------------
Note: See TracChangeset
for help on using the changeset viewer.