Changeset 8264

Timestamp:

2017-06-30T16:37:22+02:00 (7 years ago)

Author:

niall

Message:

 

File:

• branches/UKMO/AMM15_v3_6_STABLE_package_debug/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90 (modified) (2 diffs)

branches/UKMO/AMM15_v3_6_STABLE_package_debug/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90

@@ -405 +405 @@
                             CALL  istate_init   ! ocean initial state (Dynamics and tracers)
 
-      IF( lk_tide       )   CALL    tide_init( nit000 )    ! Initialisation of the tidal harmonics
-
-                            CALL     sbc_init   ! Forcings : surface module (clem: moved here for bdy purpose)
+      !IF( lk_tide       )   CALL    tide_init( nit000 )    ! Initialisation of the tidal harmonics
+
+      !                      CALL     sbc_init   ! Forcings : surface module (clem: moved here for bdy purpose)
 
       !IF( lk_bdy        )   CALL     bdy_init   ! Open boundaries initialisation
@@ -430 +430 @@
          &                  CALL zdf_ddm_init      ! double diffusive mixing
       !                                         ! Lateral physics
-                            CALL ldf_tra_init      ! Lateral ocean tracer physics
-                            CALL ldf_dyn_init      ! Lateral ocean momentum physics
+      !                      CALL ldf_tra_init      ! Lateral ocean tracer physics
+      !                      CALL ldf_dyn_init      ! Lateral ocean momentum physics
       IF( lk_ldfslp     )   CALL ldf_slp_init      ! slope of lateral mixing
 
       !                                     ! Active tracers
-                            CALL tra_qsr_init   ! penetrative solar radiation qsr
-                            CALL tra_bbc_init   ! bottom heat flux
+      !                      CALL tra_qsr_init   ! penetrative solar radiation qsr
+      !                      CALL tra_bbc_init   ! bottom heat flux
       IF( lk_trabbl     )   CALL tra_bbl_init   ! advective (and/or diffusive) bottom boundary layer scheme
-                            CALL tra_dmp_init   ! internal damping trends- tracers
-                            CALL tra_adv_init   ! horizontal & vertical advection
-                            CALL tra_ldf_init   ! lateral mixing
-                            CALL tra_zdf_init   ! vertical mixing and after tracer fields
+      !                      CALL tra_dmp_init   ! internal damping trends- tracers
+      !                      CALL tra_adv_init   ! horizontal & vertical advection
+      !                      CALL tra_ldf_init   ! lateral mixing
+      !                      CALL tra_zdf_init   ! vertical mixing and after tracer fields
 
       !                                     ! Dynamics