source: branches/UKMO/dev_r5518_GO6_package_asm_surf_bgc_v2/NEMOGCM/NEMO/OPA_SRC/ASM/asmpar.F90 @ 8495

Last change on this file since 8495 was 8495, checked in by dford, 3 years ago

Merge in changes from dev_r5518_GO6_package_asm_surf_bgc, and adapt to the updated MEDUSA structure.

File size: 2.2 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
35   !!----------------------------------------------------------------------
36   !! NEMO/OPA 3.3 , NEMO Consortium (2010)
37   !! $Id$
38   !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt)
39   !!----------------------------------------------------------------------
40
41END MODULE asmpar
Note: See TracBrowser for help on using the repository browser.