Changeset 5488


Ignore:
Timestamp:
2015-06-25T12:44:52+02:00 (5 years ago)
Author:
pabouttier
Message:

Relocate ctl_stop in sto_par_init to allow running NEMO with AGRIF without stochastic parametrization

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/NEMO/OPA_SRC/STO/stopar.F90

    r5458 r5488  
    260260      INTEGER  ::   ios                 ! Local integer output status for namelist read 
    261261 
    262       IF ( lk_agrif ) CALL ctl_stop('EOS stochastic parametrization is not compatible with AGRIF') 
    263262      ! Read namsto namelist : stochastic parameterization 
    264263      REWIND( numnam_ref )              ! Namelist namdyn_adv in reference namelist : Momentum advection scheme 
     
    338337      ENDIF 
    339338      IF( ln_sto_eos ) THEN 
     339         IF ( lk_agrif ) CALL ctl_stop('EOS stochastic parametrization is not compatible with AGRIF') 
    340340         IF(lwp) WRITE(numout,*) '       - stochastic equation of state' 
    341341         ALLOCATE(jsto_eosi(nn_sto_eos)) 
Note: See TracChangeset for help on using the changeset viewer.