Changeset 14543


Ignore:
Timestamp:
2021-02-24T18:54:44+01:00 (4 months ago)
Author:
dancopsey
Message:

Moving test for turning off shear parameterisation in lower IF test. As is done in George's master branch.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/UKMO/NEMO_4.0.1_FKOSM_m11715/src/OCE/ZDF/zdfosm.F90

    r14542 r14543  
    19761976                  ! full code available                                          ! 
    19771977!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 
    1978                   IF ( zshear(ji,jj) > 1.e-10 .AND. MIN(hu_n(ji,jj), hu_n(ji-1,jj), hv_n(ji,jj), hv_n(ji,jj-1))>100._wp ) THEN 
    1979                      IF ( zri_p(ji,jj) < rn_ri_p_thresh ) THEN 
     1978                  IF ( zshear(ji,jj) > 1.e-10 ) THEN 
     1979                     IF ( zri_p(ji,jj) < rn_ri_p_thresh .AND. MIN(hu_n(ji,jj), hu_n(ji-1,jj), hv_n(ji,jj), hv_n(ji,jj-1))>100._wp ) THEN 
    19801980                        ! Growing shear layer 
    19811981                        j_ddh(ji,jj) = 0 
Note: See TracChangeset for help on using the changeset viewer.