Lines Matching refs:m
175 double Pyr_eB(double xi[3], int sign[3], int k, int m, int along) in Pyr_eB() argument
180 k--; m--; along--; in Pyr_eB()
184 psi =0.125*(xi[2]*xi[2]-1)*(1+sign[k]*(2*xi[k]*tmp0))*(1+sign[m]*(2*xi[m]*tmp0)); in Pyr_eB()
188 psi =0.125*(tmp1*tmp1-1)*(1+sign[m]*(2*xi[m]*tmp0))*(1-xi[2]); in Pyr_eB()
193 double dPeBdxi(double xi[3], int sign[3], int k, int m, int along, int byWhich) in dPeBdxi() argument
200 k--; m--; along--; in dPeBdxi()
203 dPsidxi =-0.25*(1+xi[2])*sign[k]*(1+sign[m]*(2*xi[m]*tmp0)); in dPeBdxi()
204 else if (byWhich==m) in dPeBdxi()
205 dPsidxi =-0.25*(1+xi[2])*sign[m]*(1+sign[k]*(2*xi[k]*tmp0)); in dPeBdxi()
207 dPsidxi =0.25*(xi[2]*(1+sign[k]*2*xi[k]*tmp0)*(1+sign[m]*2*xi[m]*tmp0)- in dPeBdxi()
208 (1+xi[2])*tmp0*(sign[k]*xi[k]*(1+sign[m]*2*xi[m]*tmp0)+ in dPeBdxi()
209 sign[m]*xi[m]*(1+sign[k]*2*xi[k]*tmp0))); in dPeBdxi()
213 dPsidxi =0.5*tmp1*(1+sign[m]*(2*xi[m]*tmp0)); in dPeBdxi()
214 else if (byWhich==m) in dPeBdxi()
215 dPsidxi =0.25*(tmp1*tmp1-1)*sign[m]; in dPeBdxi()
217 dPsidxi =0.25*(tmp1*tmp1)*(1+sign[m]*(2*xi[m]*tmp0))-0.125*(tmp1*tmp1-1); in dPeBdxi()
224 double Pyr_fB (double xi[3], int sign[3], int k, int m, int faceType) in Pyr_fB() argument
237 k--; m--; in Pyr_fB()
238 double tmp1 =2*xi[m]*tmp0; in Pyr_fB()
245 double dPfBdxi(double xi[3], int sign[3], int k, int m, int faceType, int byWhich) in dPfBdxi() argument
267 k--; m--; byWhich--; in dPfBdxi()
269 double tmp1 =2*xi[m]*tmp0; in dPfBdxi()
272 else if (byWhich==m) in dPfBdxi()
273 dPsidxi =-(1+sign[k]*2*xi[k]*tmp0)*(xi[m]*tmp0)*(1+xi[1]); in dPfBdxi()
276 double tmp2 =xi[m]*tmp0; in dPfBdxi()
995 int k, m, along, j; in PyrShapeAndDrv() local
1001 k =1; m =2; sign[m-1] =-1; along =k; in PyrShapeAndDrv()
1004 k =2; m =1; sign[m-1] =1; along =k; in PyrShapeAndDrv()
1007 k =1; m =2; sign[m-1] =1; along =k; in PyrShapeAndDrv()
1010 k =2; m =1; sign[m-1] =-1; along =k; in PyrShapeAndDrv()
1014 k =1; m =2; sign[k-1] =-1; sign[m-1] =-1; along =3; in PyrShapeAndDrv()
1017 k =2; m =1; sign[k-1] =-1; sign[m-1] =1; along =3; in PyrShapeAndDrv()
1020 k =1; m =2; sign[k-1] =1; sign[m-1] =1; along =3; in PyrShapeAndDrv()
1023 k =2; m =1; sign[k-1] =1; sign[m-1] =-1; along =3; in PyrShapeAndDrv()
1025 EdgeBlend =Pyr_eB (par, sign, k, m, along); in PyrShapeAndDrv()
1027 EdgeBlendDrv[j] =dPeBdxi(par, sign, k, m, along, j); in PyrShapeAndDrv()
1069 int k, m, j; in PyrShapeAndDrv() local
1072 k =1; m =3; sign[k-1] =-1; in PyrShapeAndDrv()
1075 k =3; m =1; sign[k-1] =-1; in PyrShapeAndDrv()
1078 k =1; m =3; sign[k-1] =1; in PyrShapeAndDrv()
1081 k =3; m =1; sign[k-1] =1; in PyrShapeAndDrv()
1084 FaceBlend =Pyr_fB (par, sign, k, m, 3); in PyrShapeAndDrv()
1086 FaceBlendDrv[j] =dPfBdxi(par, sign, k, m, 3, j); in PyrShapeAndDrv()