Searched refs:cos_theta (Results 1 – 1 of 1) sorted by relevance
430 PetscReal r = 0, theta, cos_theta; in initialSolution_Psi() local437 cos_theta = PetscCosReal(theta); in initialSolution_Psi()442 u[0] = 2.0 / (k * j0(k)) * j1(k * r) * cos_theta; in initialSolution_Psi()445 u[0] = (r - 1.0 / r) * cos_theta; in initialSolution_Psi()