[WK912]

I am trying to create a UDF to use as the Inertial resistances of a few porous zones. I've copied everything pretty much exactly from the book with a few minor additions. On my first iteration calculating the solution I get a Divergence error. What am I doing wrong? Thanks in advance for the help!

#include "udf.h"
DEFINE_PROFILE(straightening_screen,t,nv)
{
cell_t c;
real velw;
begin_c_loop(c,t)
C_PROFILE(c,t,nv) = pow(23.0 *(ABS(velw) * 0.0000151) / (3.0 * 0.0000150),-0.321) / 0.356;
end_c_loop(c,t)
}

/**************************************************/

DEFINE_PROFILE(radiator_poro,t,nv)
{
cell_t c;
begin_c_loop(c,t)
C_PROFILE(c,t,nv) = 0.567;
end_c_loop(c,t)
}

[Zaktatir]

Your Velw is the problem at first