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 12919 for NEMO/branches/2020/r4.0-HEAD_r12713_clem_dan_fixcpl/src/ICE/icestp.F90 – NEMO

Context Navigation

← Previous Change
Next Change →

Changeset 12919 for NEMO/branches/2020/r4.0-HEAD_r12713_clem_dan_fixcpl/src/ICE/icestp.F90

Timestamp:

2020-05-13T14:49:18+02:00 (4 years ago)

Author:

clem

Message:

finish implementing convergence check on heat diffusion

File:

: 1 edited

NEMO/branches/2020/r4.0-HEAD_r12713_clem_dan_fixcpl/src/ICE/icestp.F90 (modified) (1 diff)

Legend:

: Unmodified
: Added
: Removed

NEMO/branches/2020/r4.0-HEAD_r12713_clem_dan_fixcpl/src/ICE/icestp.F90

-                      r12915
+                      r12919
       diag_trp_ei(:,:) = 0._wp   ;   diag_trp_es(:,:) = 0._wp
       diag_trp_sv(:,:) = 0._wp
-      ! for convergence check
-      IF( ln_zdf_chkcvg )   tice_cvg(:,:,:) = 0._wp
    END SUBROUTINE diag_set0

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

Download in other formats: