Ignore:
Timestamp:
2017-05-09T17:36:25+02:00 (3 years ago)
Author:
jchanut
Message:

AGRIF vvl add on

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_r7963_nemo_v3_6_AGRIF-3_AGRIFVVL/NEMOGCM/NEMO/OPA_SRC/DYN/dynspg_ts.F90

    r7973 r8010  
    576576         ! Set fluxes during predictor step to ensure  
    577577         ! volume conservation 
    578          IF( (.NOT.Agrif_Root()).AND.ln_bt_fw ) THEN 
     578         IF (.NOT.Agrif_Root().AND.ln_bt_fw) THEN 
    579579            IF((nbondi == -1).OR.(nbondi == 2)) THEN 
    580580               DO jj=1,jpj 
     
    11391139         IF(lwp) WRITE(numout,*) '     ln_bt_fw =.false.=> Centred integration of barotropic variables ' 
    11401140      ENDIF 
    1141       ! 
    1142 #if defined key_agrif 
    1143       ! Restrict the use of Agrif to the forward case only 
    1144       IF ((.NOT.ln_bt_fw ).AND.(.NOT.Agrif_Root())) CALL ctl_stop( 'AGRIF not implemented if ln_bt_fw=.FALSE.' ) 
    1145 #endif 
    11461141      ! 
    11471142      IF(lwp) WRITE(numout,*)    '     Time filter choice, nn_bt_flt: ', nn_bt_flt 
Note: See TracChangeset for help on using the changeset viewer.