Changeset 15236 for NEMO/releases

Timestamp:

2021-09-08T16:45:24+02:00 (3 years ago)

Author:

clem

Message:

4.0-HEAD: solve ticket #2719

Location:

NEMO/releases/r4.0/r4.0-HEAD/src/TOP/PISCES/SED

Files:

• sedchem.F90 (modified) (2 diffs)
• seddta.F90 (modified) (1 diff)

NEMO/releases/r4.0/r4.0-HEAD/src/TOP/PISCES/SED/sedchem.F90

@@ -6 +6 @@
    !!======================================================================
    !!   modules used
+   USE par_sed, ONLY : jpksed
    USE sed     ! sediment global variable
    USE sedarr
@@ -41 +42 @@
    DATA Ddsw / 999.842594 , 6.793952E-2 , -9.095290E-3, 1.001685E-4, -1.120083E-6, 6.536332E-9/
 
-  REAL(wp) :: devk10  = -25.5
+   REAL(wp) :: devk10  = -25.5
    REAL(wp) :: devk11  = -15.82
    REAL(wp) :: devk12  = -29.48

NEMO/releases/r4.0/r4.0-HEAD/src/TOP/PISCES/SED/seddta.F90

@@ -8 +8 @@
    USE sed
    USE sedarr
+   USE par_pisces
    USE phycst, ONLY : rday
    USE iom