source:
branches/UKMO/v3_6_extra_CMIP6_diagnostics/NEMOGCM/TOOLS/OBSTOOLS/src/toolspar_kind.F90
@
7491
Last change on this file since 7491 was 7491, checked in by timgraham, 8 years ago | |
---|---|
|
|
File size: 417 bytes |
Rev | Line | |
---|---|---|
[2945] | 1 | MODULE toolspar_kind |
2 | IMPLICIT NONE | |
3 | INTEGER, PUBLIC, PARAMETER :: & !: Floating point section | |
4 | sp = SELECTED_REAL_KIND( 6, 37), & !: single precision (real 4) | |
5 | dp = SELECTED_REAL_KIND(12,307), & !: double precision (real 8) | |
6 | wp = SELECTED_REAL_KIND(12,307), & !: double precision (real 8) | |
7 | ik = SELECTED_INT_KIND(6) !: integer precision | |
8 | END MODULE toolspar_kind |
Note: See TracBrowser
for help on using the repository browser.