7 OutPut(
"Example: Poiseuille_CST_Geisekus.h" << endl) ;
13 void ExactU1(
double x,
double y,
double *values)
15 values[0] = 4*y*(1-y);
21 void ExactU2(
double x,
double y,
double *values)
29 void ExactP(
double x,
double y,
double *values)
40 void BoundCondition(
int i,
double t, BoundCond &cond)
45 void U1BoundValue(
int BdComp,
double Param,
double &value)
51 case 1: value=4*Param*(1-Param);
55 case 3: value=4*Param*(1-Param);
57 default: cout <<
"wrong boundary part number" << endl;
64 void U2BoundValue(
int BdComp,
double Param,
double &value)
76 default: cout <<
"wrong boundary part number" << endl;
84 void LinCoeffs(
int n_points,
double *x,
double *y,
85 double **parameters,
double **coeffs)
91 for(i=0;i<n_points;i++)
104 void ExactS1(
double x,
double y,
double *values)
112 void ExactS2(
double x,
double y,
double *values)
120 void ExactS3(
double x,
double y,
double *values)
122 values[0] = (x*y) + 5.0;
131 void BoundCondition_CST(
int i,
double t, BoundCond &cond)
137 void S1BoundValue(
int BdComp,
double Param,
double &value)
141 case 0: value=Param + 3.0;
143 case 1: value=1 + 3.0;
145 case 2: value=(1-Param) + 3.0;
147 case 3: value=0 + 3.0;
149 default: cout <<
"wrong boundary part number" << endl;
157 void S2BoundValue(
int BdComp,
double Param,
double &value)
167 case 3: value=(1-Param);
169 default: cout <<
"wrong boundary part number" << endl;
175 void S3BoundValue(
int BdComp,
double Param,
double &value)
179 case 0: value=0 + 5.0;
181 case 1: value=Param + 5.0;
183 case 2: value=(1-Param) + 5.0;
185 case 3: value=0 + 5.0;
187 default: cout <<
"wrong boundary part number" << endl;
196 void LinCoeffs_CST(
int n_points,
double *X,
double *Y,
197 double **parameters,
double **coeffs)
201 double *coeff, *param, x, y;
202 double u1, u1x, u1y, u2, u2x, u2y, tau1, tau2, tau3, tau1x, tau1y, tau2x, tau2y, tau3x, tau3y;
204 for(i=0;i<n_points;i++)
210 param = parameters[i];
230 coeff[1] = (u1*tau1x) + (u2*tau1y) + ((1-(2.0*alpha))*nu*(tau1)) - (2*(tau1*u1x + tau2*u1y)) + (alpha*nu*((tau1*tau1) + (tau2*tau2)));
232 coeff[2] = (u1*tau2x) + (u2*tau2y) + ((1-(2.0*alpha))*nu*(tau2)) - (tau1*u2x + tau3*u1y) + (alpha*nu*((tau1*tau2) + (tau2*tau3)));
234 coeff[3] = (u1*tau3x) + (u2*tau3y) + ((1-(2.0*alpha))*nu*(tau3)) - (2*(tau2*u2x + tau3*u2y)) + (alpha*nu*((tau2*tau2) + (tau3*tau3)));
double RE_NR
Definition: Database.h:313
static TParamDB * ParamDB
Definition: Database.h:1134