source: branches/UKMO/AMM15_v3_6_STABLE_package/NEMOGCM/NEMO/OPA_SRC/ASM/asmpar.F90 @ 9180

Last change on this file since 9180 was 9180, checked in by kingr, 3 years ago

Adding changes required to write out time-averaged assimilation background.

File size: 2.0 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
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   INTEGER, PUBLIC :: nitavgbkg_r   !: Averaging period for assim bkg referenced to nit000
32
33   !!----------------------------------------------------------------------
34   !! NEMO/OPA 3.3 , NEMO Consortium (2010)
35   !! $Id$
36   !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt)
37   !!----------------------------------------------------------------------
38
39END MODULE asmpar
Note: See TracBrowser for help on using the repository browser.