|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?注册
x
#include "udf.h"
#define M 1.4e-3
#define N 0.5
#define A 1.1e-4
#define B 1.8369
DEFINE_PROFILE(Fraction_profile, cell, thread)
{
real s1;
real fraction=C_T(cell,thread);
real s1 = species_mf[3];
if (s1>5e-5)
fraction = M*(M-s1)/(N*(M+s1)-A*pow((M-s1),B));
else
fraction = 0.0;
return fraction;
} |
|