Changeset 5260 for branches/2014/dev_r4650_UKMO10_Tidally_Meaned_Diagnostics/NEMOGCM/NEMO/SAS_SRC/sbcssm.F90
- Timestamp:
- 2015-05-12T12:37:15+02:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2014/dev_r4650_UKMO10_Tidally_Meaned_Diagnostics/NEMOGCM/NEMO/SAS_SRC/sbcssm.F90
- Property svn:keywords set to Id
r4624 r5260 57 57 !!---------------------------------------------------------------------- 58 58 !! NEMO/OFF 3.3 , NEMO Consortium (2010) 59 !! $Id : sbcssm.F90 3294 2012-01-28 16:44:18Z rblod$59 !! $Id$ 60 60 !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt) 61 61 !!---------------------------------------------------------------------- … … 166 166 !! note that we need sbc_ssm called first in sbc 167 167 ! 168 IF( ln_cpl ) THEN169 IF( lwp ) WRITE(numout,*) 'Coupled mode not sensible with StandAlone Surface scheme'170 ln_cpl = .FALSE.171 ENDIF172 168 IF( ln_apr_dyn ) THEN 173 169 IF( lwp ) WRITE(numout,*) 'No atmospheric gradient needed with StandAlone Surface scheme'
Note: See TracChangeset
for help on using the changeset viewer.