49 |
& -yA(i,j) |
& -yA(i,j) |
50 |
& *(GM_background_K |
& *(GM_background_K |
51 |
#ifdef GM_VISBECK_VARIABLE_K |
#ifdef GM_VISBECK_VARIABLE_K |
52 |
& +0.5*(VisbeckK(i,j,myThid)+VisbeckK(i,j-1,myThid)) |
& +0.5*(VisbeckK(i,j,bi,bj)+VisbeckK(i,j-1,bi,bj)) |
53 |
#endif |
#endif |
54 |
& ) |
& ) |
55 |
#ifdef GM_NON_UNITY_DIAGONAL |
#ifdef GM_NON_UNITY_DIAGONAL |
56 |
& *Kvy(i,j,k,myThid) |
& *Kvy(i,j,k,bi,bj) |
57 |
#endif |
#endif |
58 |
& *_recip_dyC(i,j,bi,bj) |
& *_recip_dyC(i,j,bi,bj) |
59 |
& *(Tracer(i,j,k,bi,bj)-Tracer(i,j-1,k,bi,bj)) |
& *(Tracer(i,j,k,bi,bj)-Tracer(i,j-1,k,bi,bj)) |