Home
last modified time | relevance | path

Searched refs:PETSC_PI (Results 1 – 25 of 157) sorted by relevance

1234567

/petsc/src/ksp/ksp/tutorials/
H A Dex13.c83 solution[Ii] = PetscSinScalar(2. * PETSC_PI * x) * PetscSinScalar(2. * PETSC_PI * y); in main()
84 …PETSC_PI * PetscCosScalar(2 * PETSC_PI * x) * PetscSinScalar(2 * PETSC_PI * y) + 8 * PETSC_PI * PE… in main()
H A Dex13f90.F90297 solution(i, j) = sin(2.*PETSC_PI*x)*sin(2.*PETSC_PI*y)
298 …userb(i, j) = -2.*PETSC_PI*cos(2.*PETSC_PI*x)*sin(2.*PETSC_PI*y) + 8*PETSC_PI*PETSC_PI*x*sin(2.*PE…
H A Dex42.c1146 *MX = 2.0 * PETSC_PI; in evaluate_MS_FrankKamentski_constants()
1147 *MY = 2.0 * PETSC_PI; in evaluate_MS_FrankKamentski_constants()
1148 *MZ = 2.0 * PETSC_PI; in evaluate_MS_FrankKamentski_constants()
1170 v[0] = PetscPowRealInt(z, 3) * PetscExpReal(y) * PetscSinReal(PETSC_PI * x); in evaluate_MS_FrankKamentski()
1171 v[1] = z * PetscCosReal(2.0 * PETSC_PI * x) * PetscExpReal(-y) * PetscSinReal(PETSC_PI * y); in evaluate_MS_FrankKamentski()
1172 …PETSC_PI * x) * PetscExpReal(-y) * PetscSinReal(PETSC_PI * y) / 2 - PETSC_PI * PetscCosReal(PETSC_… in evaluate_MS_FrankKamentski()
1195 …PETSC_PI, 2) * PetscCosReal(PETSC_PI * y) * PetscExpReal(-y) * PetscSinReal(2.0 * PETSC_PI * x) - … in evaluate_MS_FrankKamentski()
1196 …PETSC_PI * x) * PetscExpReal(-y) * PetscSinReal(PETSC_PI * y) / 2 + PetscPowRealInt(PETSC_PI, 2) *… in evaluate_MS_FrankKamentski()
1197 …PETSC_PI, 2) * PetscCosReal(2.0 * PETSC_PI * x) * PetscExpReal(-y) * PetscSinReal(PETSC_PI * y) + … in evaluate_MS_FrankKamentski()
1876 … cell->fy[p] = -PetscSinReal(2.2 * PETSC_PI * coord_y) * PetscCosReal(1.0 * PETSC_PI * coord_x); in solve_stokes_3d_coupled()
[all …]
H A Dex68.c23 xx[i] = (xd * xd - 1.0) * PetscCosReal(5. * PETSC_PI * xd); in ComputeSolution()
44 …(-20. * PETSC_PI * xd * PetscSinReal(5. * PETSC_PI * xd) + (2. - (5. * PETSC_PI) * (5. * PETSC_PI)… in ComputeRhs()
H A Dex69.c37 uu[j] = (xd * xd - 1.0) * PetscCosReal(5. * PETSC_PI * xd); in ComputeSolution()
69 …(-20. * PETSC_PI * xd * PetscSinReal(5. * PETSC_PI * xd) + (2. - (5. * PETSC_PI) * (5. * PETSC_PI)… in ComputeRhs()
H A Dex25.c114 v[0] = (-1.0 - user->e * PetscSinScalar(2.0 * PETSC_PI * user->k * xlow)) / h; in ComputeMatrix()
116 … = (2.0 + user->e * PetscSinScalar(2.0 * PETSC_PI * user->k * xlow) + user->e * PetscSinScalar(2.… in ComputeMatrix()
118 v[2] = (-1.0 - user->e * PetscSinScalar(2.0 * PETSC_PI * user->k * xhigh)) / h; in ComputeMatrix()
H A Dex34.c73 …Scalar(2 * PETSC_PI * (((PetscReal)i + 0.5) * Hx)) * PetscCosScalar(2 * PETSC_PI * (((PetscReal)j … in main()
115 …PETSC_PI * PETSC_PI * PetscCosScalar(2 * PETSC_PI * (((PetscReal)i + 0.5) * Hx)) * PetscCosScalar(… in ComputeRHS()
/petsc/src/ts/tutorials/advection-diffusion-reaction/
H A Dex3.c183 …(i = mstart; i < mend; i++) u[i] = PetscSinScalar(PETSC_PI * i * 6. * h) + 3. * PetscSinScalar(PET… in InitialConditions()
224 ex1 = PetscExpScalar(-36. * PETSC_PI * PETSC_PI * appctx->d * t); in Solution()
225 ex2 = PetscExpScalar(-4. * PETSC_PI * PETSC_PI * appctx->d * t); in Solution()
226 sc1 = PETSC_PI * 6. * h; in Solution()
227 sc2 = PETSC_PI * 2. * h; in Solution()
228 …c1 * (PetscReal)i + appctx->a * PETSC_PI * 6. * t) * ex1 + 3. * PetscSinScalar(sc2 * (PetscReal)i … in Solution()
H A Dex5opt_ic.c101 …i].v = .25 * PetscPowReal(PetscSinReal(4.0 * PETSC_PI * x), 2.0) * PetscPowReal(PetscSinReal(4.0 *… in InitialConditions()
133 …v = .25 * PetscPowReal(PetscSinReal(4.0 * PETSC_PI * 0.5 * x), 2.0) * PetscPowReal(PetscSinReal(4.… in PerturbedInitialConditions()
166 …][i].v = PetscPowReal(PetscSinReal(4.0 * PETSC_PI * (x - 0.5)), 2.0) * PetscPowReal(PetscSinReal(4… in PerturbedInitialConditions2()
198 …i].v = .25 * PetscPowReal(PetscSinReal(4.0 * PETSC_PI * x), 2.0) * PetscPowReal(PetscSinReal(4.0 *… in PerturbedInitialConditions3()
/petsc/src/snes/tutorials/
H A Dex62.c200 u[0] = (dim - 1) * PetscSinReal(PETSC_PI * x[0]); in trig_u()
202 u[0] += PetscSinReal(PETSC_PI * x[c]); in trig_u()
203 u[c] = -PETSC_PI * PetscCosReal(PETSC_PI * x[0]) * x[c]; in trig_u()
212 for (d = 0, u[0] = 0.0; d < dim; ++d) u[0] += PetscSinReal(2.0 * PETSC_PI * x[d]); in trig_p()
221 …f0[0] = -2.0 * PETSC_PI * PetscCosReal(2.0 * PETSC_PI * x[0]) - (dim - 1) * mu * PetscSqr(PETSC_PI… in f0_trig_u()
223 f0[0] -= mu * PetscSqr(PETSC_PI) * PetscSinReal(PETSC_PI * x[d]); in f0_trig_u()
224 …f0[d] = -2.0 * PETSC_PI * PetscCosReal(2.0 * PETSC_PI * x[d]) + mu * PetscPowRealInt(PETSC_PI, 3) … in f0_trig_u()
H A Dex5.c193 u[0] = PetscSinReal(PETSC_PI * x) * PetscSinReal(PETSC_PI * y); in MMSSolution2()
202 …qr(PETSC_PI) * PetscSinReal(PETSC_PI * x) * PetscSinReal(PETSC_PI * y) - user->param * PetscExpRea… in MMSForcing2()
211 …u[0] = PetscSinReal(user->m * PETSC_PI * x * (1 - y)) * PetscSinReal(user->n * PETSC_PI * y * (1 -… in MMSSolution3()
221 …PETSC_PI * x * (1 - y)) * PetscSinReal(n * PETSC_PI * (1 - x) * y)) * lambda) + PetscSqr(PETSC_PI)… in MMSForcing3()
H A Dex55.c146 u[0] = PetscSinReal(PETSC_PI * x) * PetscSinReal(PETSC_PI * y); in MMSSolution2()
153 …qr(PETSC_PI) * PetscSinReal(PETSC_PI * x) * PetscSinReal(PETSC_PI * y) - user->param * PetscExpRea… in MMSForcing2()
160 …u[0] = PetscSinReal(user->m * PETSC_PI * x * (1 - y)) * PetscSinReal(user->n * PETSC_PI * y * (1 -… in MMSSolution3()
168 …PETSC_PI * x * (1 - y)) * PetscSinReal(n * PETSC_PI * (1 - x) * y)) * lambda) + PetscSqr(PETSC_PI)… in MMSForcing3()
/petsc/src/ts/tutorials/
H A Dex5.c271 … < appctx->m; i++) u_localptr[i] = PetscCosScalar(PETSC_PI * i * 6. * h) + 3. * PetscCosScalar(PET… in InitialConditions()
314 ex1 = PetscExpScalar(-36. * PETSC_PI * PETSC_PI * tc); in ExactSolution()
315 ex2 = PetscExpScalar(-4. * PETSC_PI * PETSC_PI * tc); in ExactSolution()
316 sc1 = PETSC_PI * 6. * h; in ExactSolution()
317 sc2 = PETSC_PI * 2. * h; in ExactSolution()
H A Dex6.c274 …< appctx->m; i++) u_localptr[i] = PetscSinReal(PETSC_PI * i * 6. * appctx->h) + 3. * PetscSinReal(… in InitialConditions()
314 ex1 = PetscExpReal(-36. * PETSC_PI * PETSC_PI * t); in ExactSolution()
315 ex2 = PetscExpReal(-4. * PETSC_PI * PETSC_PI * t); in ExactSolution()
316 sc1 = PETSC_PI * 6. * h; in ExactSolution()
317 sc2 = PETSC_PI * 2. * h; in ExactSolution()
H A Dex4.c317 …end; i++) u_localptr[i - mybase] = PetscSinScalar(PETSC_PI * i * 6. * h) + 3. * PetscSinScalar(PET… in InitialConditions()
366 ex1 = PetscExpReal(-36. * PETSC_PI * PETSC_PI * t); in ExactSolution()
367 ex2 = PetscExpReal(-4. * PETSC_PI * PETSC_PI * t); in ExactSolution()
368 sc1 = PETSC_PI * 6. * h; in ExactSolution()
369 sc2 = PETSC_PI * 2. * h; in ExactSolution()
H A Dex3.c308 … < appctx->m; i++) u_localptr[i] = PetscSinScalar(PETSC_PI * i * 6. * h) + 3. * PetscSinScalar(PET… in InitialConditions()
351 ex1 = PetscExpScalar(-36. * PETSC_PI * PETSC_PI * tc); in ExactSolution()
352 ex2 = PetscExpScalar(-4. * PETSC_PI * PETSC_PI * tc); in ExactSolution()
353 sc1 = PETSC_PI * 6. * h; in ExactSolution()
354 sc2 = PETSC_PI * 2. * h; in ExactSolution()
H A Dex76.c444 …[0] = 1 - PetscCosReal(PETSC_PI * (X[0] - time)) * PetscSinReal(PETSC_PI * (X[1] - time)) * PetscE… in taylor_green_u()
445 …[1] = 1 + PetscSinReal(PETSC_PI * (X[0] - time)) * PetscCosReal(PETSC_PI * (X[1] - time)) * PetscE… in taylor_green_u()
450 …PETSC_PI * (PetscSinReal(PETSC_PI * (X[0] - time)) * PetscSinReal(PETSC_PI * (X[1] - time)) - Pets… in taylor_green_u_t()
451 …PETSC_PI * (PetscSinReal(PETSC_PI * (X[0] - time)) * PetscSinReal(PETSC_PI * (X[1] - time)) - Pets… in taylor_green_u_t()
457 … * (PetscCosReal(2 * PETSC_PI * (X[0] - time)) + PetscCosReal(2 * PETSC_PI * (X[1] - time))) * Pet… in taylor_green_p()
463 …PETSC_PI * (0.5 * (PetscSinReal(2 * PETSC_PI * (X[0] - time)) + PetscSinReal(2 * PETSC_PI * (X[1] … in taylor_green_p_t()
648 …am->Reynolds / param->mu) * (X[1] * (1.0 - X[1]) + param->epsilon * PetscSinReal(PETSC_PI * X[1])); in pipe_wiggly_u()
674 T[0] = X[1] * (1.0 - X[1]) + param->epsilon * PetscSinReal(PETSC_PI * X[1]) + param->T_in; in pipe_wiggly_T()
692 f0[0] -= eps * 0.5 * PetscSqr(PETSC_PI) * PetscSinReal(PETSC_PI * X[1]); in f0_conduct_pipe_wiggly_v()
699 …+ eps * 0.5 * PETSC_PI * PetscCosReal(PETSC_PI * X[1])), (PetscReal)(0.5 * (1. - 2. * X[1]) + eps … in f0_conduct_bd_pipe_wiggly_v()
[all …]
H A Dex45.c120 *u = dim * PetscSqr(PETSC_PI) * time; in mms_trig_lin()
121 for (d = 0; d < dim; ++d) *u += PetscCosReal(PETSC_PI * x[d]); in mms_trig_lin()
127 *u = dim * PetscSqr(PETSC_PI); in mms_trig_lin_t()
135 for (d = 0; d < dim; ++d) f0[0] += PetscSqr(PETSC_PI) * (PetscCosReal(PETSC_PI * x[d]) - 1.0); in f0_trig_lin()
157 *u = PetscSqr(PETSC_PI) * PetscCosReal(time); in mms_trig_trig()
158 for (d = 0; d < dim; ++d) *u += PetscCosReal(PETSC_PI * x[d]); in mms_trig_trig()
164 *u = -PetscSqr(PETSC_PI) * PetscSinReal(time); in mms_trig_trig_t()
171 f0[0] -= PetscSqr(PETSC_PI) * PetscSinReal(t); in f0_trig_trig_exp()
172 for (d = 0; d < dim; ++d) f0[0] += PetscSqr(PETSC_PI) * PetscCosReal(PETSC_PI * x[d]); in f0_trig_trig_exp()
/petsc/src/dm/dt/interface/
H A Ddtprob.c27 p[0] = PetscSqrtReal(2. / PETSC_PI) * PetscExpReal(-0.5 * PetscSqr(x[0])); in PetscPDFMaxwellBoltzmann1D()
115 p[0] = PetscSqrtReal(2. / PETSC_PI) * PetscSqr(x[0]) * PetscExpReal(-0.5 * PetscSqr(x[0])); in PetscPDFMaxwellBoltzmann3D()
137 …p[0] = PetscErfReal(x[0] / PETSC_SQRT2) - PetscSqrtReal(2. / PETSC_PI) * x[0] * PetscExpReal(-0.5 … in PetscCDFMaxwellBoltzmann3D()
160 …p[0] = PetscSqrtReal(1. / (2. * PETSC_PI)) * PetscExpReal(-0.5 * PetscSqr(x[0] / … in PetscPDFGaussian1D()
202 r = ck[0] * (PetscSqrtReal(PETSC_PI) / 2.) * q; in PetscPDFSampleGaussian1D()
211 r += (ck[k] / temp) * PetscPowReal((PetscSqrtReal(PETSC_PI) / 2.) * q, 2. * k + 1.); in PetscPDFSampleGaussian1D()
214 x[0] = PetscSqrtReal(PETSC_PI * 0.5) * r; in PetscPDFSampleGaussian1D()
236 p[0] = (1. / PETSC_PI) * PetscExpReal(-0.5 * (PetscSqr(x[0]) + PetscSqr(x[1]))); in PetscPDFGaussian2D()
260 x[0] = mag * PetscCosReal(2.0 * PETSC_PI * p[1]); in PetscPDFSampleGaussian2D()
261 x[1] = mag * PetscSinReal(2.0 * PETSC_PI * p[1]); in PetscPDFSampleGaussian2D()
[all …]
/petsc/src/tao/tutorials/
H A Dex2.c68 …PETSC_PI * x[0]) * sin(2.0 * PETSC_PI * x[1]))) + PetscSqr(u[0] - (x[0] * x[0] + x[1] * x[1])) * (… in f0_u_full()
81 …PETSC_PI * x[0]) * sin(2.0 * PETSC_PI * x[1])) + PetscSqr(u[0] - (x[0] * x[0] + x[1] * x[1])) - 2.… in g0_uu_full()
/petsc/src/tao/unconstrained/tutorials/
H A Dburgers_spectral.c304 … i++) s[i] = 2.0 * appctx->param.mu * PETSC_PI * PetscSinScalar(PETSC_PI * xg[i]) / (2.0 + PetscCo… in InitialConditions()
332 … i++) s[i] = 2.0 * appctx->param.mu * PETSC_PI * PetscSinScalar(PETSC_PI * xg[i]) / (2.0 + PetscCo… in TrueSolution()
358 …PETSC_PI * PetscSinScalar(PETSC_PI * xg[i]) * PetscExpScalar(-PETSC_PI * PETSC_PI * t * appctx->pa… in ComputeObjective()
/petsc/src/ts/tests/
H A Dex35.c36 r = ck[0] * ((PetscSqrtReal(PETSC_PI) / 2.) * x); in erfinv()
43 r += (ck[k] / temp) * PetscPowReal((PetscSqrtReal(PETSC_PI) / 2.) * x, 2. * k + 1.); in erfinv()
132 zx = mag * PetscCosReal(2 * PETSC_PI * u2) + 0; in main()
133 zy = mag * PetscSinReal(2 * PETSC_PI * u2) + 0; in main()
/petsc/src/dm/tutorials/
H A Dex26.c34 scale = exp2(n - 1) * scale * PetscSqrtReal(PETSC_PI) / (n * n); in main()
52 g /= sqrt(PETSC_PI); in main()
/petsc/src/ts/utils/dmplexlandau/tutorials/
H A Dex2.c54 *f0 = n_e * 2. * PETSC_PI * x[0] * x[1] * constants[0]; /* n * r * v_|| * q */ in f0_j_re()
73 …for (ii = 0; ii < Nf; ii++) f0[0] += u[ii] * 2. * PETSC_PI * x[0] * x[1] * q[ii]; /* n * r * v_|| … in f0_jz_sum()
83 if (dim == 2) f0[0] = 2. * PETSC_PI * x[0] * u[ii]; in f0_n()
91 if (dim == 2) f0[0] = u[ii] * 2. * PETSC_PI * x[0] * x[1]; /* n r v_|| */ in f0_vz()
99 …if (dim == 2) *f0 = u[0] * 2. * PETSC_PI * x[0] * PetscSqrtReal(x[0] * x[0] + (x[1] - vz) * (x[1] … in f0_ve_shift()
121 Ec = n * lnLambda * PetscPowReal(e, 3) / (4 * PETSC_PI * PetscPowReal(eps0, 2) * m * c * c); in CalculateE()
126 vth = PetscSqrtReal(8 * Tev * e / (m * PETSC_PI)); in CalculateE()
127 … Ed = n * lnLambda * PetscPowReal(e, 3) / (4 * PETSC_PI * PetscPowReal(eps0, 2) * m * vth * vth); in CalculateE()
136 …Fz * 4. / 3. * PetscSqrtReal(2. * PETSC_PI) * Z * PetscSqrtReal(m_e) * PetscSqr(e) * lnLam * Petsc… in Spitzer()
205 …Te_kev = (v2 * ctx->masses[0] * PETSC_PI / 8) * kev_joul; … in testSpitzer()
[all …]
/petsc/src/mat/tests/
H A Dex99.c58 PetscCall(MatScale(A, PETSC_PI)); in CheckMatrices()
59 PetscCall(MatScale(B, PETSC_PI)); in CheckMatrices()
62 PetscCall(MatShift(A, PETSC_PI)); in CheckMatrices()
63 PetscCall(MatShift(B, PETSC_PI)); in CheckMatrices()

1234567