#include "udf.h"
DEFINE_PROFILE(ramp,heat, thread, position)
{
float t, heat;
face t f;
t= RP Get Real("flow-time");
heat= (((0.6695)*(t*t*t*t))/(167961600000000)-(((8.0777)*(t*t*t*))/(46656000000)+(((4.1714)*(t*t))/(12960000))+(((121.03)*(t))/(3600.))+195.81;
begin f loop(f, thread)
{
F_PROFILE(f, thread, position) = heat;
}
end f loop(f, thread)
}