Changeset 15337

Timestamp:

2021-10-06T13:12:37+02:00 (20 months ago)

Author:

andmirek

Message:

Ticket GO29: fix tests 7 and 8

Location:

branches/UKMO/dev_r5518_GO6_package_port2021/NEMOGCM

Files:

• NEMO/OPA_SRC/ASM/asmbgc.F90 (modified) (1 diff)
• NEMO/OPA_SRC/stpctl.F90 (modified) (2 diffs)
• SETTE/sette.sh (modified) (1 diff)

branches/UKMO/dev_r5518_GO6_package_port2021/NEMOGCM/NEMO/OPA_SRC/ASM/asmbgc.F90

@@ -30 +30 @@
       & jpj,                &
       & jpk
+   USE phycst, ONLY:        rt0
 #if defined key_vvl
    USE dom_oce,       ONLY: gdepw_n

branches/UKMO/dev_r5518_GO6_package_port2021/NEMOGCM/NEMO/OPA_SRC/stpctl.F90

@@ -250 +250 @@
          ENDIF
          !
-         IF( ll_wrtruns ) THEN
             zssh2 = SUM( sshn(:,:) * sshn(:,:) * tmask_i(:,:) )
             IF( lk_mpp )   CALL mpp_sum( zssh2 )      ! sum over the global domain
          !
+         IF( ll_wrtruns ) THEN
             WRITE(numsol,9300) kt, zssh2, zumax, zsmin      ! ssh statistics
             IF(lflush) CALL flush(numsol)
@@ -259 +259 @@
          !
       ENDIF
-
 9200  FORMAT('it:', i8, ' iter:', i4, ' r: ',e16.10, ' b: ',e16.10 )
 9300  FORMAT(' it :', i8, ' ssh2: ', e16.10, ' Umax: ',e16.10,' Smin: ',e16.10)

branches/UKMO/dev_r5518_GO6_package_port2021/NEMOGCM/SETTE/sette.sh

@@ -143 +143 @@
 # ORCA2_AGRIF_LIM :16 & 17 
 #                  18 & 19 
-for config in 13
+for config in 8
 
 do