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.F90 in trunk/NEMO/LIM_SRC – NEMO

source: trunk/NEMO/LIM_SRC/par_ice.F90 @ 88

Last change on this file since 88 was 88, checked in by opalod, 20 years ago

CT : UPDATE057 : # General syntax, alignement, comments corrections

# l_ctl alone replace the set (l_ctl .AND. lwp)
# Add of diagnostics which are activated when using l_ctl logical
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 776 bytes
Line 
1MODULE par_ice
2   !!======================================================================
3   !!                       ***  MODULE par_ice   ***
4   !! Sea-Ice model : definition of the parameters
5   !!======================================================================
6   !! * Modules used
7   USE par_oce
8
9   IMPLICIT NONE
10   PUBLIC               ! allows par_oce and par_kind to be known in ice modules
11
12   INTEGER, PUBLIC, PARAMETER ::   &  !:
13      jpkmax =  1    ,      &  !: ???
14      jpsmax =  2              !: ???
15
16   INTEGER, PUBLIC, PARAMETER ::   &  !:
17      jplayers   = 2 ,           &  !: number of vertical ice layers
18      jplayersp1 = jplayers + 1     !: ???
19
20   !!======================================================================
21END MODULE par_ice
Note: See TracBrowser for help on using the repository browser.