Ignore:
Timestamp:
2018-07-02T18:19:04+02:00 (3 years ago)
Author:
clem
Message:

solve problem described in ticket #2107

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/ICE/icedyn_rhg_evp.F90

    r9660 r9866  
    498498            CALL agrif_interp_ice( 'V' ) 
    499499#endif 
    500 !clem: this call makes rheology numerically unstable, thus I removed it but one has to check the effect on the boundaries 
    501 !            IF( ln_bdy ) CALL bdy_ice_dyn( 'V' ) 
     500            IF( ln_bdy ) CALL bdy_ice_dyn( 'V' ) 
    502501            ! 
    503502            DO jj = 2, jpjm1 
     
    547546            CALL agrif_interp_ice( 'U' ) 
    548547#endif 
    549 !clem: this call makes rheology numerically unstable, thus I removed it but one has to check the effect on the boundaries 
    550 !            IF( ln_bdy ) CALL bdy_ice_dyn( 'U' ) 
     548            IF( ln_bdy ) CALL bdy_ice_dyn( 'U' ) 
    551549            ! 
    552550         ELSE ! odd iterations 
     
    598596            CALL agrif_interp_ice( 'U' ) 
    599597#endif 
    600 !clem: this call makes rheology numerically unstable, thus I removed it but one has to check the effect on the boundaries 
    601 !            IF( ln_bdy ) CALL bdy_ice_dyn( 'U' ) 
     598            IF( ln_bdy ) CALL bdy_ice_dyn( 'U' ) 
    602599            ! 
    603600            DO jj = 2, jpjm1 
     
    647644            CALL agrif_interp_ice( 'V' ) 
    648645#endif 
    649 !clem: this call makes rheology numerically unstable, thus I removed it but one has to check the effect on the boundaries 
    650 !            IF( ln_bdy ) CALL bdy_ice_dyn( 'V' ) 
     646            IF( ln_bdy ) CALL bdy_ice_dyn( 'V' ) 
    651647            ! 
    652648         ENDIF 
Note: See TracChangeset for help on using the changeset viewer.