Changeset 15540 for NEMO/branches/2021/dev_r14116_HPC-10_mcastril_Mixed_Precision_implementation/src/OCE/OBS/obs_level_search.h90
- 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/OBS/obs_level_search.h90
r10068 r15540 25 25 !! * Arguments 26 26 INTEGER, INTENT(IN) :: kgrd ! Number of gridpoints 27 REAL(KIND= wp), DIMENSION(kgrd), INTENT(INOUT) :: &27 REAL(KIND=dp), DIMENSION(kgrd), INTENT(INOUT) :: & 28 28 & pgrddep ! Depths of gridpoints 29 29 INTEGER, INTENT(IN) :: & 30 30 & kobs ! Number of observations 31 REAL(KIND= wp), DIMENSION(kobs), INTENT(INOUT) :: &31 REAL(KIND=dp), DIMENSION(kobs), INTENT(INOUT) :: & 32 32 & pobsdep ! Depths of observations 33 33 INTEGER ,DIMENSION(kobs), INTENT(OUT) :: &
Note: See TracChangeset
for help on using the changeset viewer.