SURFEX
V8_0
Surfex V8_0 release
Main Page
Data Types List
Files
File List
File Members
All
Classes
Files
Functions
Variables
src
SURFEX
modd_data_parameters.F90
Go to the documentation of this file.
1
!SFX_LIC Copyright 1994-2014 CNRS, Meteo-France and Universite Paul Sabatier
2
!SFX_LIC This is part of the SURFEX software governed by the CeCILL-C licence
3
!SFX_LIC version 1. See LICENSE, CeCILL-C_V1-en.txt and CeCILL-C_V1-fr.txt
4
!SFX_LIC for details. version 1.
5
! File %M% from Library %Q%
6
! Version %I% from %G% extracted: %H%
7
!+ Data module for global parameters
8
!-------------------------------------------------------------------------------
9
10
MODULE
modd_data_parameters
11
12
!-------------------------------------------------------------------------------
13
!
14
! Description:
15
! Global parameters for the program are defined.
16
!
17
! Current Code Owner: DWD, Ulrich Schaettler
18
! phone: +49 69 8062 2739
19
! fax: +49 69 8236 1493
20
! email: uschaettler@dwd.d400.de
21
!
22
! History:
23
! Version Date Name
24
! ---------- ---------- ----
25
! 1.1 1998/03/11 Ulrich Schaettler
26
! Initial release
27
! 1.8 1998/08/03 Ulrich Schaettler
28
! Eliminated intgribf, intgribc, irealgrib, iwlength and put it to data_io.
29
! 1.10 1998/09/29 Ulrich Schaettler
30
! Eliminated parameters for grid point and diagnostic calculations.
31
! !VERSION! !DATE! <Your name>
32
! <Modification comments>
33
!
34
! Code Description:
35
! Language: Fortran 90.
36
! Software Standards: "European Standards for Writing and
37
! Documenting Exchangeable Fortran 90 Code".
38
!=======================================================================
39
!
40
! Declarations:
41
!
42
! Modules used:
43
!=======================================================================
44
45
IMPLICIT NONE
46
47
!=======================================================================
48
! Global (i.e. public) Declarations:
49
! Parameters for the Program:
50
51
INTEGER
,
PARAMETER
:: &
52
ireals = SELECTED_REAL_KIND (12,200), &
53
! number of desired significant digits for
54
! real variables
55
! corresponds to 8 byte real variables
56
iintegers = kind(1)
57
! kind-type parameter of the integer values
58
! corresponds to the default integers
59
60
!=======================================================================
61
62
END MODULE
modd_data_parameters
63
modd_data_parameters
Definition:
modd_data_parameters.F90:10
Generated on Fri May 13 2016 09:31:04 for SURFEX by
1.8.5