Home
last modified time | relevance | path

Searched refs:Ni_p (Results 1 – 4 of 4) sorted by relevance

/petsc/src/ksp/ksp/tutorials/
H A Dex42.c671 PetscScalar Ni_p[NODES_PER_EL]; in FormGradientOperatorQ13D() local
680 ShapeFunctionQ13D_Evaluate(gp_xi[p], Ni_p); in FormGradientOperatorQ13D()
691 Ke[IJ] = Ke[IJ] - GNx_p[di][i] * Ni_p[j] * fac; in FormGradientOperatorQ13D()
721 PetscScalar Ni_p[NODES_PER_EL]; in FormStabilisationOperatorQ13D() local
730 ShapeFunctionQ13D_Evaluate(gp_xi[p], Ni_p); in FormStabilisationOperatorQ13D()
743 …for (j = 0; j < NODES_PER_EL; j++) Ke[NODES_PER_EL * i + j] -= fac * (Ni_p[i] * Ni_p[j] - 0.015625… in FormStabilisationOperatorQ13D()
775 PetscScalar Ni_p[NODES_PER_EL]; in FormScaledMassMatrixOperatorQ13D() local
784 ShapeFunctionQ13D_Evaluate(gp_xi[p], Ni_p); in FormScaledMassMatrixOperatorQ13D()
798 …< NODES_PER_EL; j++) Ke[NODES_PER_EL * i + j] = Ke[NODES_PER_EL * i + j] - fac * Ni_p[i] * Ni_p[j]; in FormScaledMassMatrixOperatorQ13D()
829 PetscScalar Ni_p[NODES_PER_EL]; in FormMomentumRhsQ13D() local
[all …]
H A Dex43.c547 PetscScalar Ni_p[NODES_PER_EL]; in FormGradientOperatorQ1() local
556 ConstructQ12D_Ni(gp_xi[p], Ni_p); in FormGradientOperatorQ1()
567 Ke[IJ] = Ke[IJ] - GNx_p[di][i] * Ni_p[j] * fac; in FormGradientOperatorQ1()
597 PetscScalar Ni_p[NODES_PER_EL]; in FormStabilisationOperatorQ1() local
606 ConstructQ12D_Ni(gp_xi[p], Ni_p); in FormStabilisationOperatorQ1()
612 …_EL; j++) Ke[NODES_PER_EL * i + j] = Ke[NODES_PER_EL * i + j] - fac * (Ni_p[i] * Ni_p[j] - 0.0625); in FormStabilisationOperatorQ1()
632 PetscScalar Ni_p[NODES_PER_EL]; in FormScaledMassMatrixOperatorQ1() local
641 ConstructQ12D_Ni(gp_xi[p], Ni_p); in FormScaledMassMatrixOperatorQ1()
647 …< NODES_PER_EL; j++) Ke[NODES_PER_EL * i + j] = Ke[NODES_PER_EL * i + j] - fac * Ni_p[i] * Ni_p[j]; in FormScaledMassMatrixOperatorQ1()
667 PetscScalar Ni_p[NODES_PER_EL]; in FormMomentumRhsQ1() local
[all …]
H A Dex70.c194 PetscScalar Ni_p[NODES_PER_EL], GNi_p[NSD][NODES_PER_EL], GNx_p[NSD][NODES_PER_EL]; in BForm_Grad() local
203 EvaluateBasis_Q1(gp_xi[p], Ni_p); in BForm_Grad()
214 Ke[IJ] -= GNx_p[di][i] * Ni_p[j] * fac; in BForm_Grad()
240 PetscScalar Ni_p[NODES_PER_EL], GNi_p[NSD][NODES_PER_EL], GNx_p[NSD][NODES_PER_EL]; in BForm_Stabilisation() local
249 EvaluateBasis_Q1(gp_xi[p], Ni_p); in BForm_Stabilisation()
255 … for (j = 0; j < NODES_PER_EL; j++) Ke[NODES_PER_EL * i + j] -= fac * (Ni_p[i] * Ni_p[j] - 0.0625); in BForm_Stabilisation()
272 PetscScalar Ni_p[NODES_PER_EL], GNi_p[NSD][NODES_PER_EL], GNx_p[NSD][NODES_PER_EL]; in BForm_ScaledMassMatrix() local
281 EvaluateBasis_Q1(gp_xi[p], Ni_p); in BForm_ScaledMassMatrix()
287 for (j = 0; j < NODES_PER_EL; j++) Ke[NODES_PER_EL * i + j] -= fac * Ni_p[i] * Ni_p[j]; in BForm_ScaledMassMatrix()
304 PetscScalar Ni_p[NODES_PER_EL], GNi_p[NSD][NODES_PER_EL], GNx_p[NSD][NODES_PER_EL]; in LForm_MomentumRHS() local
[all …]
H A Dex49.c487 PetscScalar Ni_p[NODES_PER_EL]; in FormMomentumRhsQ1() local
496 ConstructQ12D_Ni(gp_xi[p], Ni_p); in FormMomentumRhsQ1()
502 Fe[NSD * i] += fac * Ni_p[i] * fx[p]; in FormMomentumRhsQ1()
503 Fe[NSD * i + 1] += fac * Ni_p[i] * fy[p]; in FormMomentumRhsQ1()
806 PetscScalar xi_p[2], Ni_p[4]; in solve_elasticity_2d() local
810 ConstructQ12D_Ni(xi_p, Ni_p); in solve_elasticity_2d()
815 gp_x = gp_x + Ni_p[n] * el_coords[2 * n]; in solve_elasticity_2d()
816 gp_y = gp_y + Ni_p[n] * el_coords[2 * n + 1]; in solve_elasticity_2d()