Changes between Initial Version and Version 1 of Ticket #1932
- Timestamp:
- 2017-09-04T11:19:29+02:00 (7 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
Ticket #1932 – Description
initial v1 7 7 The cause can be traced to north-fold points with zero bathymetry gradients across the fold. Consistent calculation of the diffusive coefficients relies on density gradients and bathymetry gradients taking opposite signs either side of the pivot, I.e. in routine bbl: 8 8 9 {{{ 9 {{{#!f 10 10 zgdrho = ( za * ( zts(ji,jj+1,jp_tem) - zts(ji,jj,jp_tem)) & 11 11 & - zb * ( zts(ji,jj+1,jp_sal) - zts(ji,jj,jp_sal)) ) * vmask(ji,jj,1) … … 17 17 but mgrhv (for example) is set in tra_bbl_init by: 18 18 19 {{{ 19 {{{#!f 20 20 !* sign of grad(H) at u- and v-points 21 21 mgrhu(jpi,:) = 0 ; mgrhu(:,jpj) = 0 ; mgrhv(jpi,:) = 0 ; mgrhv(:,jpj) = 0 … … 51 51 This code replacement in tra_bbl_init (trabbl.F90) achieves this: 52 52 53 {{{ 53 {{{#!f 54 54 !* sign of grad(H) at u- and v-points; zero if grad(H) = 0 55 55 mgrhu(:,:) = 0 ; mgrhv(:,:) = 0