Changeset 13258 for NEMO/branches/2020/dev_r12973_AGRIF_CMEMS/src/OCE/STO
- Timestamp:
- 2020-07-07T12:23:18+02:00 (4 years ago)
- Location:
- NEMO/branches/2020/dev_r12973_AGRIF_CMEMS
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_r12973_AGRIF_CMEMS
- Property svn:externals
-
old new 2 2 ^/utils/build/makenemo@HEAD makenemo 3 3 ^/utils/build/mk@HEAD mk 4 ^/utils/tools _dev_r12970_AGRIF_CMEMStools4 ^/utils/tools/@HEAD tools 5 5 ^/vendors/AGRIF/dev_r12970_AGRIF_CMEMS ext/AGRIF 6 6 ^/vendors/FCM@HEAD ext/FCM
-
- Property svn:externals
-
NEMO/branches/2020/dev_r12973_AGRIF_CMEMS/src/OCE/STO/stopar.F90
r13026 r13258 687 687 INTEGER :: idg ! number of digits 688 688 INTEGER(KIND=8) :: ziseed(4) ! RNG seeds in integer type 689 REAL(KIND= 8) :: zrseed(4) ! RNG seeds in real type(with same bits to save in restart)689 REAL(KIND=dp) :: zrseed(4) ! RNG seeds in double-precision (with same bits to save in restart) 690 690 CHARACTER(LEN=9) :: clsto2d='sto2d_000' ! stochastic parameter variable name 691 691 CHARACTER(LEN=9) :: clsto3d='sto3d_000' ! stochastic parameter variable name … … 749 749 INTEGER :: idg ! number of digits 750 750 INTEGER(KIND=8) :: ziseed(4) ! RNG seeds in integer type 751 REAL(KIND= 8) :: zrseed(4) ! RNG seeds in real type(with same bits to save in restart)751 REAL(KIND=dp) :: zrseed(4) ! RNG seeds in double-precision (with same bits to save in restart) 752 752 CHARACTER(LEN=20) :: clkt ! ocean time-step defined as a character 753 753 CHARACTER(LEN=50) :: clname ! restart file name … … 835 835 !! 836 836 INTEGER :: ji, jj 837 REAL( KIND=8) :: gran ! Gaussian random number (forced KIND=8 as in kiss_gaussian)837 REAL(wp) :: gran ! Gaussian random number (forced KIND=8 as in kiss_gaussian) 838 838 839 839 DO_2D_11_11
Note: See TracChangeset
for help on using the changeset viewer.