source: branches/UKMO/AMM15_v3_6_STABLE_package_collate_BGC_DA/NEMOGCM/NEMO/OPA_SRC/ASM/asmpar.F90 @ 10574

Last change on this file since 10574 was 10574, checked in by dford, 19 months ago

Merge in functionality added to GO6 at r10149.

File size: 2.3 KB
Line 
1MODULE 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      & c_asmbal = 'assim.balincs'                 !: Filename for storing the
26                                                   !: balancing increments calculated
27                                                   !: for biogeochemistry
28
29   INTEGER, PUBLIC :: nitbkg_r      !: Background time step referenced to nit000
30   INTEGER, PUBLIC :: nitdin_r      !: Direct Initialization time step referenced to nit000
31   INTEGER, PUBLIC :: nitiaustr_r   !: IAU starting time step referenced to nit000
32   INTEGER, PUBLIC :: nitiaufin_r   !: IAU final time step referenced to nit000
33   INTEGER, PUBLIC :: nittrjfrq     !: Frequency of trajectory output for 4D-VAR
34   INTEGER, PUBLIC :: nitavgbkg_r   !: Averaging period for assim bkg referenced to nit000
35
36   !!----------------------------------------------------------------------
37   !! NEMO/OPA 3.3 , NEMO Consortium (2010)
38   !! $Id$
39   !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt)
40   !!----------------------------------------------------------------------
41
42END MODULE asmpar
Note: See TracBrowser for help on using the repository browser.