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 2518 – NEMO

Context Navigation

← Previous Changeset
Next Changeset →

Changeset 2518

Timestamp:

2010-12-23T17:39:22+01:00 (13 years ago)

Author:

cetlod

Message:

v3.3:minor bug correction in PISCES

File:

: 1 edited

branches/nemo_v3_3_beta/NEMOGCM/NEMO/TOP_SRC/PISCES/p4zint.F90 (modified) (1 diff)

Legend:

: Unmodified
: Added
: Removed

branches/nemo_v3_3_beta/NEMOGCM/NEMO/TOP_SRC/PISCES/p4zint.F90

r2517	r2518
69	69	END DO
70	70
71		IF( nday_year == ~~REAL(nyear_len(1), wp~~) ) THEN
	71	IF( nday_year == nyear_len(1) ) THEN
72	72	xksi = xksimax
73	73	xksimax = 0.e0

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

Download in other formats: