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 12592 for NEMO/branches/2020/dev_r12563_ASINTER-06_ABL_improvement/src/ABL/sbcabl.F90 – NEMO

Context Navigation

← Previous Change
Next Change →

Changeset 12592 for NEMO/branches/2020/dev_r12563_ASINTER-06_ABL_improvement/src/ABL/sbcabl.F90

Timestamp:

2020-03-24T15:08:27+01:00 (3 years ago)

Author:

gsamson

Message:

correct mxld_abl & mxlm_abl init to avoid division by zero (ticket #2419)

File:

: 1 edited

NEMO/branches/2020/dev_r12563_ASINTER-06_ABL_improvement/src/ABL/sbcabl.F90 (modified) (1 diff)

Legend:

: Unmodified
: Added
: Removed

NEMO/branches/2020/dev_r12563_ASINTER-06_ABL_improvement/src/ABL/sbcabl.F90

-                      r12588
+                      r12592
          tq_abl (:,:,:,nt_a,:   ) = 0._wp
          tke_abl(:,:,:,nt_a     ) = 0._wp
+         mxlm_abl(:,:,:         ) = mxl_min
+         mxld_abl(:,:,:         ) = mxl_min
       ENDIF

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

Download in other formats: