1 | MODULE asmpar |
---|
2 | !!====================================================================== |
---|
3 | !! *** MODULE asmpar *** |
---|
4 | !! Assimilation increment : Parameters for assimilation interface |
---|
5 | !!====================================================================== |
---|
6 | |
---|
7 | IMPLICIT NONE |
---|
8 | |
---|
9 | !! * Routine accessibility |
---|
10 | PRIVATE |
---|
11 | |
---|
12 | !! * Shared Modules variables |
---|
13 | CHARACTER (LEN=40), PUBLIC, PARAMETER :: & |
---|
14 | & c_asmbkg = 'assim_background_state_Jb', & !: Filename for storing the |
---|
15 | !: background state for use |
---|
16 | !: in the Jb term |
---|
17 | & c_asmdin = 'assim_background_state_DI', & !: Filename for storing the |
---|
18 | !: background state for direct |
---|
19 | !: initialization |
---|
20 | & c_asmtrj = 'assim_trj', & !: Filename for storing the |
---|
21 | !: reference trajectory |
---|
22 | & c_asminc = 'assim_background_increments' !: Filename for storing the |
---|
23 | !: increments to the background |
---|
24 | !: state |
---|
25 | |
---|
26 | INTEGER, PUBLIC :: nitbkg_r !: Background time step referenced to nit000 |
---|
27 | INTEGER, PUBLIC :: nitdin_r !: Direct Initialization time step referenced to nit000 |
---|
28 | INTEGER, PUBLIC :: nitiaustr_r !: IAU starting time step referenced to nit000 |
---|
29 | INTEGER, PUBLIC :: nitiaufin_r !: IAU final time step referenced to nit000 |
---|
30 | INTEGER, PUBLIC :: nittrjfrq !: Frequency of trajectory output for 4D-VAR |
---|
31 | |
---|
32 | !!---------------------------------------------------------------------- |
---|
33 | !! NEMO/OPA 3.3 , NEMO Consortium (2010) |
---|
34 | !! $Id$ |
---|
35 | !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt) |
---|
36 | !!---------------------------------------------------------------------- |
---|
37 | |
---|
38 | END MODULE asmpar |
---|