Changeset 4352 for branches/2013/dev_ECMWF_waves/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

Timestamp:

2014-01-17T11:35:16+01:00 (10 years ago)

Author:

acc

Message:

Branch 2013/dev_ECMWF_waves ticket #1216. Corrections to first set of code imports to solve compilation issues

File:

• branches/2013/dev_ECMWF_waves/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90 (modified) (2 diffs)

branches/2013/dev_ECMWF_waves/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

@@ -51 +51 @@
    USE sbcwave          ! Wave module
    USE sbcwave_ecmwf    ! ECMWF wave module
-   USE sbcwavelim       ! Wave for LIM module
 
    IMPLICIT NONE
@@ -142 +141 @@
          WRITE(numout,*) '              TKE wave breaking BC from wave model       ln_wavetke  = ', ln_wavetke
          WRITE(numout,*) '              Wave-modified stress from wave model       ln_tauoc    = ', ln_tauoc
-         WRITE(numout,*) '              Wave-modified stress min. sea. frac     rn_taouc_cimin = ', rn_taouc_cimin
       ENDIF