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 branches/2014/dev_r4650_UKMO3_masked_damping/NEMOGCM/NEMO/LIM_SRC_3 – NEMO

source: branches/2014/dev_r4650_UKMO3_masked_damping/NEMOGCM/NEMO/LIM_SRC_3/par_ice.F90 @ 7357

Last change on this file since 7357 was 5086, checked in by timgraham, 9 years ago

Merged head of trunk into branch in preparation for putting code back onto the trunk
In working copy ran the command:
svn merge svn+sshtimgraham@…/ipsl/forge/projets/nemo/svn/trunk

Also recompiled NEMO_book.pdf with merged input files
  • Property svn:keywords set to Id
File size: 1.1 KB
RevLine 
[825]1MODULE par_ice
2   !!======================================================================
3   !!                       ***  MODULE par_ice   ***
[1608]4   !! LIM-3 Sea Ice :   definition of parameters
[825]5   !!======================================================================
[1608]6   !! History :  3.0  ! 2003-08  (M. Vancoppenolle)  LIM-3
[825]7   !!----------------------------------------------------------------------
8   USE par_oce
9
10   IMPLICIT NONE
[1608]11   PUBLIC         
[825]12
[1608]13   !                                             !!! ice thermodynamics
[5086]14   INTEGER, PUBLIC, PARAMETER ::   nlay_i   = 5   !: number of ice layers
[1608]15   INTEGER, PUBLIC, PARAMETER ::   nlay_s   = 1   !: number of snow layers
[921]16
[1608]17   !                                             !!! ice mechanical redistribution
18   INTEGER, PUBLIC, PARAMETER ::   jpl      = 5   !: number of ice categories
[825]19
[1608]20   !!----------------------------------------------------------------------
[2528]21   !! NEMO/LIM3 3.3 , UCL - NEMO Consortium (2010)
[1608]22   !! $Id$
[2528]23   !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt)
[825]24   !!======================================================================
25END MODULE par_ice
Note: See TracBrowser for help on using the repository browser.