Changeset 531 for trunk/NEMO/OPA_SRC/SOL

Timestamp:

2006-10-19T14:55:25+02:00 (18 years ago)

Author:

opalod

Message:

nemo_v1_update_75 : CT : enables bit comparison between single and multiple processor runs adding nbit_cmp namelist parameter

File:

• trunk/NEMO/OPA_SRC/SOL/solver.F90 (modified) (2 diffs)

trunk/NEMO/OPA_SRC/SOL/solver.F90

@@ -108 +108 @@
 #endif
 
-
       ! 0. Parameter control and print
       !    ---------------------------
@@ -187 +186 @@
       END SELECT
 
+      IF( nbit_cmp == 1 .AND. nsolv /= 2 ) THEN
+         CALL ctl_stop( ' Reproductibility tests (nbit_cmp=1) require the SOR solver: nsolv = 2' )
+      END IF
+
       ! Grid-point at which the solver is applied
       ! -----------------------------------------