Changeset 4141 for dynamico_lmdz/aquaplanet/IOIPSL/src/def.prec

Timestamp:

Apr 30, 2019, 5:20:04 PM (6 years ago)

Author:

jgipsl

Message:

Update with the official version of IOIPSL to be compatible with modipsl.

File:

• dynamico_lmdz/aquaplanet/IOIPSL/src/def.prec (modified) (2 diffs)

dynamico_lmdz/aquaplanet/IOIPSL/src/def.prec

@@ -1 @@
-! @author Jacques Bellier, Marie-Alice Foujols, Jan Polcher
-! @Version : $Revision: 2.1 $, $Date: 2005/06/24 09:57:17 $
-! $Header: /home/ioipsl/CVSROOT/IOIPSL/src/def.prec,v 2.1 2005/06/24 09:57:17 adm Exp $
-!
 MODULE defprec 
+!-
+! $Id: def.prec 386 2008-09-04 08:38:48Z bellier $
+!-
+! This software is governed by the CeCILL license
+! See IOIPSL/IOIPSL_License_CeCILL.txt
 !!--------------------------------------------------------------------
 !! The module "defprec" set default precision for computation
@@ -17 +18 @@
   INTEGER,PARAMETER :: r_4=SELECTED_REAL_KIND(6,37)
   INTEGER,PARAMETER :: r_8=SELECTED_REAL_KIND(15,307)
-!#-P-I4R4   INTEGER,PARAMETER :: i_std=i_4, r_std=r_4
-!#-P-I4R8   INTEGER,PARAMETER :: i_std=i_4, r_std=r_8
-!#-P-I8R8   INTEGER,PARAMETER :: i_std=i_8, r_std=r_8
+  INTEGER,PARAMETER :: i_std=i_?, r_std=r_?
 !-----------------
 END MODULE defprec