#include "udf.h"
#define PI 3.14159265359
DEFINE_PROFILE(l_velocity500Hz,thread,position)
{
face_t f;
begin_f_loop(f, thread)
{
real t=RP_Get_Real("flow-time");
F_PROFILE(f,thread,position)=2*sin(1000.0*PI*t);
}
end_f_loop(f,thread)
}
DEFINE_PROFILE(r_velocity500Hz,thread,position)
{
face_t f;
begin_f_loop(f, thread)
{
real t=RP_Get_Real("flow-time");
F_PROFILE(f,thread,position)=2*sin(1000.0*PI*t+PI);
}
end_f_loop(f,thread)
}