source: branches/NERC/dev_r5518_GO6_CO2_cmip/NEMOGCM/NEMO/TOP_SRC/MEDUSA/mocsy_singledouble.F90 @ 9309

Last change on this file since 9309 was 5841, checked in by jpalmier, 5 years ago

JPALM —30-10-2015— Add MOCSY and DMS to MEDUSA-NEMO3.6

File size: 458 bytes
Line 
1!> \file mocsy_singledouble.f90
2!! \BRIEF
3!> Module that defines single and double precision - used by all other modules
4MODULE mocsy_singledouble
5! INTEGER, PARAMETER :: r4 = SELECTED_REAL_KIND(6)
6! INTEGER, PARAMETER :: r8 = SELECTED_REAL_KIND(12)
7  INTEGER, PARAMETER :: r4 = KIND(1.0)
8  INTEGER, PARAMETER :: r8 = KIND(1.0d0)
9! INTEGER, PARAMETER :: wp = KIND(1.0d0)
10  INTEGER, PARAMETER :: wp = SELECTED_REAL_KIND(12,307)
11END MODULE mocsy_singledouble
Note: See TracBrowser for help on using the repository browser.