static void meanflow_temperature(integer *nlev, realtype *dt, realtype *cnpar, realtype *i_0, realtype *heat, realtype *nuh, realtype *gamh, realtype *rad)
void temperature_(integer *nlev, realtype *dt, realtype *cnpar, realtype *i_0, realtype *heat, realtype *nuh, realtype *gamh, realtype *rad)