asmpar.F90 2.0 KB

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