void stratification_(integer *nlev, integer *buoy_method, realtype *dt, realtype *cnpar, realtype *nub, realtype *gamb)
static void meanflow_stratification(integer *nlev, integer *buoy_method, realtype *dt, realtype *cnpar, realtype *nub, realtype *gamb)