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.

Changeset 8825 for branches/UKMO/dev_r8183_ICEMODEL_svn_removed/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90 – NEMO

Context Navigation

← Previous Change
Next Change →

Changeset 8825 for branches/UKMO/dev_r8183_ICEMODEL_svn_removed/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90

Timestamp:

2017-11-27T17:22:53+01:00 (6 years ago)

Author:

alexwestmohc

Message:

Adding some temporary code to initialise the meltpond variables to zero prior to
sending these through the coupler

File:

: 1 edited

branches/UKMO/dev_r8183_ICEMODEL_svn_removed/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90 (modified) (1 diff)

Legend:

: Unmodified
: Added
: Removed

branches/UKMO/dev_r8183_ICEMODEL_svn_removed/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90

-                      r8796
+                      r8825
       !!!!! Getting NEMO4-LIM to work
+      !!!!! Temporary code while we're not modelling meltponds
+      a_p(:,:,1:jpl) = 0.0
+      ht_p(:,:,1:jpl) = 0.0
+      !
       ! Send meltpond fields

Note: See TracChangeset for help on using the changeset viewer.

Download in other formats: