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

Context Navigation

← Previous Changeset
Next Changeset →

Changeset 12847

Timestamp:

2020-05-01T15:05:15+02:00 (3 years ago)

Author:

cguiavarch

Message:

Limit hmle (hmle < 1.2 mld)

File:

: 1 edited

NEMO/branches/UKMO/NEMO_4.0.1_FKOSM/src/OCE/ZDF/zdfosm.F90 (modified) (1 diff)

Legend:

: Unmodified
: Added
: Removed

NEMO/branches/UKMO/NEMO_4.0.1_FKOSM/src/OCE/ZDF/zdfosm.F90

r12386	r12847
1940	1940	ENDIF
1941	1941	hmle(ji,jj) = MIN(hmle(ji,jj), ht_n(ji,jj))
	1942	hmle(ji,jj) = MIN(hmle(ji,jj), 1.2*zmld(ji,jj))
1942	1943	END DO
1943	1944	END DO

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

Download in other formats: