Changeset 4141
- Timestamp:
- Apr 30, 2019, 5:20:04 PM (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
dynamico_lmdz/aquaplanet/IOIPSL/src/def.prec
r3847 r4141 1 ! @author Jacques Bellier, Marie-Alice Foujols, Jan Polcher2 ! @Version : $Revision: 2.1 $, $Date: 2005/06/24 09:57:17 $3 ! $Header: /home/ioipsl/CVSROOT/IOIPSL/src/def.prec,v 2.1 2005/06/24 09:57:17 adm Exp $4 !5 1 MODULE defprec 2 !- 3 ! $Id: def.prec 386 2008-09-04 08:38:48Z bellier $ 4 !- 5 ! This software is governed by the CeCILL license 6 ! See IOIPSL/IOIPSL_License_CeCILL.txt 6 7 !!-------------------------------------------------------------------- 7 8 !! The module "defprec" set default precision for computation … … 17 18 INTEGER,PARAMETER :: r_4=SELECTED_REAL_KIND(6,37) 18 19 INTEGER,PARAMETER :: r_8=SELECTED_REAL_KIND(15,307) 19 !#-P-I4R4 INTEGER,PARAMETER :: i_std=i_4, r_std=r_4 20 !#-P-I4R8 INTEGER,PARAMETER :: i_std=i_4, r_std=r_8 21 !#-P-I8R8 INTEGER,PARAMETER :: i_std=i_8, r_std=r_8 20 INTEGER,PARAMETER :: i_std=i_?, r_std=r_? 22 21 !----------------- 23 22 END MODULE defprec
Note: See TracChangeset
for help on using the changeset viewer.