Lines Matching refs:eta
27 PetscScalar eta[GAUSS_POINTS]; member
105 PetscReal eta = PetscRealPart(_xi[1]); in ShapeFunctionQ13D_Evaluate() local
108 Ni[0] = 0.125 * (1.0 - xi) * (1.0 - eta) * (1.0 - zeta); in ShapeFunctionQ13D_Evaluate()
109 Ni[1] = 0.125 * (1.0 - xi) * (1.0 + eta) * (1.0 - zeta); in ShapeFunctionQ13D_Evaluate()
110 Ni[2] = 0.125 * (1.0 + xi) * (1.0 + eta) * (1.0 - zeta); in ShapeFunctionQ13D_Evaluate()
111 Ni[3] = 0.125 * (1.0 + xi) * (1.0 - eta) * (1.0 - zeta); in ShapeFunctionQ13D_Evaluate()
113 Ni[4] = 0.125 * (1.0 - xi) * (1.0 - eta) * (1.0 + zeta); in ShapeFunctionQ13D_Evaluate()
114 Ni[5] = 0.125 * (1.0 - xi) * (1.0 + eta) * (1.0 + zeta); in ShapeFunctionQ13D_Evaluate()
115 Ni[6] = 0.125 * (1.0 + xi) * (1.0 + eta) * (1.0 + zeta); in ShapeFunctionQ13D_Evaluate()
116 Ni[7] = 0.125 * (1.0 + xi) * (1.0 - eta) * (1.0 + zeta); in ShapeFunctionQ13D_Evaluate()
122 PetscReal eta = PetscRealPart(_xi[1]); in ShapeFunctionQ13D_Evaluate_dxi() local
125 GNi[0][0] = -0.125 * (1.0 - eta) * (1.0 - zeta); in ShapeFunctionQ13D_Evaluate_dxi()
126 GNi[0][1] = -0.125 * (1.0 + eta) * (1.0 - zeta); in ShapeFunctionQ13D_Evaluate_dxi()
127 GNi[0][2] = 0.125 * (1.0 + eta) * (1.0 - zeta); in ShapeFunctionQ13D_Evaluate_dxi()
128 GNi[0][3] = 0.125 * (1.0 - eta) * (1.0 - zeta); in ShapeFunctionQ13D_Evaluate_dxi()
130 GNi[0][4] = -0.125 * (1.0 - eta) * (1.0 + zeta); in ShapeFunctionQ13D_Evaluate_dxi()
131 GNi[0][5] = -0.125 * (1.0 + eta) * (1.0 + zeta); in ShapeFunctionQ13D_Evaluate_dxi()
132 GNi[0][6] = 0.125 * (1.0 + eta) * (1.0 + zeta); in ShapeFunctionQ13D_Evaluate_dxi()
133 GNi[0][7] = 0.125 * (1.0 - eta) * (1.0 + zeta); in ShapeFunctionQ13D_Evaluate_dxi()
145 GNi[2][0] = -0.125 * (1.0 - xi) * (1.0 - eta); in ShapeFunctionQ13D_Evaluate_dxi()
146 GNi[2][1] = -0.125 * (1.0 - xi) * (1.0 + eta); in ShapeFunctionQ13D_Evaluate_dxi()
147 GNi[2][2] = -0.125 * (1.0 + xi) * (1.0 + eta); in ShapeFunctionQ13D_Evaluate_dxi()
148 GNi[2][3] = -0.125 * (1.0 + xi) * (1.0 - eta); in ShapeFunctionQ13D_Evaluate_dxi()
150 GNi[2][4] = 0.125 * (1.0 - xi) * (1.0 - eta); in ShapeFunctionQ13D_Evaluate_dxi()
151 GNi[2][5] = 0.125 * (1.0 - xi) * (1.0 + eta); in ShapeFunctionQ13D_Evaluate_dxi()
152 GNi[2][6] = 0.125 * (1.0 + xi) * (1.0 + eta); in ShapeFunctionQ13D_Evaluate_dxi()
153 GNi[2][7] = 0.125 * (1.0 + xi) * (1.0 - eta); in ShapeFunctionQ13D_Evaluate_dxi()
592 static void FormStressOperatorQ13D(PetscScalar Ke[], PetscScalar coords[], PetscScalar eta[]) in FormStressOperatorQ13D() argument
637 tildeD[0] = 2.0 * gp_weight[p] * J_p * eta[p]; in FormStressOperatorQ13D()
638 tildeD[1] = 2.0 * gp_weight[p] * J_p * eta[p]; in FormStressOperatorQ13D()
639 tildeD[2] = 2.0 * gp_weight[p] * J_p * eta[p]; in FormStressOperatorQ13D()
641 tildeD[3] = gp_weight[p] * J_p * eta[p]; in FormStressOperatorQ13D()
642 tildeD[4] = gp_weight[p] * J_p * eta[p]; in FormStressOperatorQ13D()
643 tildeD[5] = gp_weight[p] * J_p * eta[p]; in FormStressOperatorQ13D()
715 static void FormStabilisationOperatorQ13D(PetscScalar Ke[], PetscScalar coords[], PetscScalar eta[]) in FormStabilisationOperatorQ13D() argument
749 for (p = 0; p < ngp; p++) eta_avg += eta[p]; in FormStabilisationOperatorQ13D()
769 …ic void FormScaledMassMatrixOperatorQ13D(PetscScalar Ke[], PetscScalar coords[], PetscScalar eta[]) in FormScaledMassMatrixOperatorQ13D() argument
804 for (p = 0; p < ngp; p++) eta_avg += eta[p]; in FormScaledMassMatrixOperatorQ13D()
930 prop_eta = props->eta; in AssembleA_Stokes()
1017 prop_eta = props->eta; in AssembleA_PCStokes()
1150 static void evaluate_MS_FrankKamentski(PetscReal pos[], PetscReal v[], PetscReal *p, PetscReal *eta… in evaluate_MS_FrankKamentski() argument
1175 if (eta) { in evaluate_MS_FrankKamentski()
1177 *eta = 1.0; in evaluate_MS_FrankKamentski()
1873 cell->eta[p] = 1.0; in solve_stokes_3d_coupled()
1889 PetscReal eta, Fm[NSD], Fc, pos[NSD]; in solve_stokes_3d_coupled() local
1902 evaluate_MS_FrankKamentski(pos, NULL, NULL, &eta, Fm, &Fc); in solve_stokes_3d_coupled()
1903 cell->eta[p] = eta; in solve_stokes_3d_coupled()
1927 cell->eta[p] = 1.0; in solve_stokes_3d_coupled()
1951 cell->eta[p] = 1.0e-2; in solve_stokes_3d_coupled()
1958 cell->eta[p] = 1.0; in solve_stokes_3d_coupled()
1993 cell->eta[p] = jump ? PetscPowReal(10.0, opts_mag) : opts_eta0; in solve_stokes_3d_coupled()