Searched refs:F2_t (Results 1 – 1 of 1) sorted by relevance
571 PetscScalar F2_t = 0.0; in terzaghi_2d_u_t() local574 …if (m % 2 == 1) F2_t += (2.0 * c / PetscSqr(L)) * PetscCosReal(0.5 * m * PETSC_PI * zstar) * Petsc… in terzaghi_2d_u_t()577 u[1] = ((P_0 * L * (nu_u - nu)) / (2.0 * G * (1.0 - nu_u) * (1.0 - nu))) * F2_t; /* m / s */ in terzaghi_2d_u_t()