- Timestamp:
- 2012-01-27T14:21:11+01:00 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/OPA_SRC/TRA/traldf.F90
r3186 r3284 163 163 IF( ln_traldf_hor ) ioptio = ioptio + 1 164 164 IF( ln_traldf_iso ) ioptio = ioptio + 1 165 IF( ioptio /=1 ) CALL ctl_stop( ' use only ONE direction (level/hor/iso)' )165 IF( ioptio > 1 ) CALL ctl_stop( ' use only ONE direction (level/hor/iso)' ) 166 166 167 167 ! defined the type of lateral diffusion from ln_traldf_... logicals
Note: See TracChangeset
for help on using the changeset viewer.