Changeset 14219 for NEMO/branches/2020/dev_r14116_HPC-04_mcastril_Mixed_Precision_implementation_final/src/OCE/ICB/icbini.F90
- Timestamp:
- 2020-12-18T18:52:57+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_r14116_HPC-04_mcastril_Mixed_Precision_implementation_final/src/OCE/ICB/icbini.F90
r14030 r14219 41 41 !! * Substitutions 42 42 # include "do_loop_substitute.h90" 43 # include "single_precision_substitute.h90" 44 43 45 !!---------------------------------------------------------------------- 44 46 !! NEMO/OCE 4.0 , NEMO Consortium (2018) … … 60 62 !! - setup either test icebergs or calving file 61 63 !!---------------------------------------------------------------------- 62 REAL( wp), INTENT(in) :: pdt ! iceberg time-step (rn_Dt*nn_fsbc)64 REAL(dp), INTENT(in) :: pdt ! iceberg time-step (rn_Dt*nn_fsbc) 63 65 INTEGER , INTENT(in) :: kt ! time step number 64 66 !
Note: See TracChangeset
for help on using the changeset viewer.