void tkeeq_(integer *nlev, realtype *dt, realtype *u_taus, realtype *u_taub, realtype *z0s, realtype *z0b, realtype *h, realtype *nn, realtype *ss)
static void turbulence_tkeeq(integer *nlev, realtype *dt, realtype *u_taus, realtype *u_taub, realtype *z0s, realtype *z0b, realtype *h, realtype *nn, realtype *ss)