New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
par_ice_2.F90 in branches/UKMO/dev_r5785_SSS_obsoper/NEMOGCM/NEMO/LIM_SRC_2 – NEMO

source: branches/UKMO/dev_r5785_SSS_obsoper/NEMOGCM/NEMO/LIM_SRC_2/par_ice_2.F90

Last change on this file was 7773, checked in by mattmartin, 7 years ago

Committing updates after doing the following:

  • merging the branch dev_r4650_general_vert_coord_obsoper@7763 into this branch
  • updating it so that the following OBS changes were implemented correctly on top of the simplification changes:
    • generalised vertical coordinate for profile obs. This was done so that is now the default option.
    • sst bias correction implemented with the new simplified obs code.
    • included the biogeochemical obs types int he new simplified obs code.
    • included the changes to exclude obs in the boundary for limited area models
    • included other changes for the efficiency of the obs operator to remove global arrays.
File size: 1.4 KB
Line 
1MODULE par_ice_2
2   !!======================================================================
3   !!                       ***  MODULE par_ice_2   ***
4   !! Sea-Ice model : definition of the parameters
5   !!======================================================================
6#if defined key_lim2
7   !!----------------------------------------------------------------------
8   !!  'key_lim2'                                       LIM-2 sea-ice model
9   !!----------------------------------------------------------------------
10   USE par_oce
11
12   IMPLICIT NONE
13   PUBLIC               ! allows par_oce and par_kind to be known in ice modules
14
15   INTEGER, PUBLIC, PARAMETER ::   jpl        = 1              !: number of ice categories (only 1 in LIM-2)
16
17   INTEGER, PUBLIC, PARAMETER ::   jplayers   = 2              !: number of vertical ice layers
18   INTEGER, PUBLIC, PARAMETER ::   jplayersp1 = jplayers + 1   !: ???
19
20#else
21   !!----------------------------------------------------------------------
22   !!  Default option                                No LIM-2 sea-ice model
23   !!----------------------------------------------------------------------
24#endif
25   !!----------------------------------------------------------------------
26   !! NEMO/LIM2 3.3 , UCL - NEMO Consortium (2010)
27   !! $Id$
28   !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt)
29   !!======================================================================
30END MODULE par_ice_2
Note: See TracBrowser for help on using the repository browser.