Searched refs:lk (Results 1 – 1 of 1) sorted by relevance
914 PetscInt li, nxi, lj, neta, lk, nzeta, n; in DMCreateInterpolation_DA_3D_Q1() local926 …for (lk = 0; lk < nzeta; lk++) zeta[lk] = -1.0 + (PetscScalar)lk * (2.0 / (PetscScalar)(nzeta - 1)… in DMCreateInterpolation_DA_3D_Q1()943 lk = l - ratiok * (l / ratiok); in DMCreateInterpolation_DA_3D_Q1()944 if (l == mz - 1) lk = nzeta - 1; in DMCreateInterpolation_DA_3D_Q1()952 if ((lk == 0) || (lk == nzeta - 1)) { in DMCreateInterpolation_DA_3D_Q1()976 Ni[0] = 0.125 * (1.0 - xi[li]) * (1.0 - eta[lj]) * (1.0 - zeta[lk]); in DMCreateInterpolation_DA_3D_Q1()977 Ni[1] = 0.125 * (1.0 + xi[li]) * (1.0 - eta[lj]) * (1.0 - zeta[lk]); in DMCreateInterpolation_DA_3D_Q1()978 Ni[2] = 0.125 * (1.0 - xi[li]) * (1.0 + eta[lj]) * (1.0 - zeta[lk]); in DMCreateInterpolation_DA_3D_Q1()979 Ni[3] = 0.125 * (1.0 + xi[li]) * (1.0 + eta[lj]) * (1.0 - zeta[lk]); in DMCreateInterpolation_DA_3D_Q1()981 Ni[4] = 0.125 * (1.0 - xi[li]) * (1.0 - eta[lj]) * (1.0 + zeta[lk]); in DMCreateInterpolation_DA_3D_Q1()[all …]