Changeset 14623 for utils/tools/DOMAINcfg/src/par_kind.f90

Timestamp:

2021-03-21T19:40:22+01:00 (3 years ago)

Author:

ldebreu

Message:

AGFdomcfg: 1) Update DOMAINcfg to be compliant with the removal of halo cells 2) Update most of the LBC ... subroutines to a recent NEMO 4 version #2638

File:

• utils/tools/DOMAINcfg/src/par_kind.f90 (modified) (2 diffs)

utils/tools/DOMAINcfg/src/par_kind.f90

@@ -24 +24 @@
    INTEGER, PUBLIC, PARAMETER ::   sp = SELECTED_REAL_KIND( 6, 37)   !: single precision (real 4)
    INTEGER, PUBLIC, PARAMETER ::   dp = SELECTED_REAL_KIND(12,307)   !: double precision (real 8)
+# if defined key_single
+   INTEGER, PUBLIC, PARAMETER ::   wp = sp                              !: working precision
+# else
    INTEGER, PUBLIC, PARAMETER ::   wp = dp                              !: working precision
+# endif
 
    !                                                                !!** Integer **
@@ -31 +35 @@
    
    !                                                                !!** Integer **
-   INTEGER, PUBLIC, PARAMETER ::   lc = 256                          !: Lenght of Character strings
+   INTEGER, PUBLIC, PARAMETER ::   lc  = 256                          !: Lenght of Character strings
+   INTEGER, PUBLIC, PARAMETER ::   lca = 400                          !: Lenght of Character arrays
 
    !!----------------------------------------------------------------------
-   !! NEMO/OCE 4.0 , NEMO Consortium (2018)
-   !! $Id: par_kind.F90 2528 2010-12-27 17:33:53Z rblod $ 
-   !! Software governed by the CeCILL licence     (./LICENSE)
+   !! NEMO 3.3 , NEMO Consortium (2018)
+   !! $Id: par_kind.F90 13226 2020-07-02 14:24:31Z orioltp $ 
+   !! Software governed by the CeCILL license (see ./LICENSE)
    !!----------------------------------------------------------------------
 END MODULE par_kind