Searched refs:F1_t (Results 1 – 1 of 1) sorted by relevance
656 PetscScalar F1_t = 0.0; in terzaghi_2d_p_t() local661 …if (m % 2 == 1) F1_t += ((-m * PETSC_PI * c) / PetscSqr(L)) * PetscSinReal(0.5 * m * PETSC_PI * zs… in terzaghi_2d_p_t()663 u[0] = ((P_0 * eta) / (G * S)) * F1_t; /* Pa / s */ in terzaghi_2d_p_t()