source:
branches/UKMO/r8395_cpl_tauwav/NEMOGCM/NEMO/OPA_SRC/OBS/obs_const.F90
@
12286
Last change on this file since 12286 was 12286, checked in by jcastill, 5 years ago | |
---|---|
File size: 789 bytes |
Line | |
---|---|
1 | MODULE obs_const |
2 | !!===================================================================== |
3 | !! *** MODULE obs_const *** |
4 | !! Observation diagnostics: Constants used by many modules |
5 | !!===================================================================== |
6 | !!---------------------------------------------------------------------- |
7 | !! NEMO/OPA 3.3 , NEMO Consortium (2010) |
8 | !! $Id$ |
9 | !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt) |
10 | !!---------------------------------------------------------------------- |
11 | |
12 | !! * Modules used |
13 | USE par_kind, ONLY : & ! Precision variables |
14 | & sp |
15 | IMPLICIT NONE |
16 | |
17 | !! * Routine/type accessibility |
18 | PUBLIC |
19 | |
20 | REAL(kind=sp), PARAMETER :: obfillflt=99999. |
21 | |
22 | END MODULE obs_const |
23 |
Note: See TracBrowser
for help on using the repository browser.