*ID MJRVISB
*/ To reintroduce a bug into the Visbeck scheme, to make the 
*/ code the same as 4.4.
*DECLARE OVISCALC
*D OVISCALC.179
                   if (tmin1_global(i,jpos) .le. tmin1_max 
