Changeset 7064 for branches/UKMO/dev_r5518_nn_etau_revision/NEMOGCM/NEMO
- Timestamp:
- 2016-10-21T15:39:03+02:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_nn_etau_revision/NEMOGCM/NEMO/OPA_SRC/ZDF/zdftke.F90
r7027 r7064 831 831 htau(:,:) = MAX( 0.5_wp, MIN( 15._wp, 45._wp* ABS( SIN( rpi/180._wp * gphit(:,:) ) ) ) ) 832 832 CASE( 4 ) ! F(latitude) : single sine curve per hemisphere 833 zmax_scale = 1._wp ! Amount to scale the maximum value by 833 zmax_scale = 1._wp ! Amount to scale the maximum value by. Set it to 2./3. later 834 834 zmin = 0.5_wp ! The minimum value 835 835 zmax_h_n = 10._wp * zmax_scale ! The hard maximum value (cutoff imposed on sine curve)
Note: See TracChangeset
for help on using the changeset viewer.