Home
last modified time | relevance | path

Searched refs:q_q (Results 1 – 2 of 2) sorted by relevance

/petsc/src/ts/tutorials/hamiltonian/
H A Dex2.c1543 PetscReal rpq[3], r, r3, q_q; in ComputeFieldAtParticles_Coulomb() local
1546 q_q = ctx->charges[species[q]] * 1.; in ComputeFieldAtParticles_Coulomb()
1551 for (PetscInt d = 0; d < dim; ++d) pE[d] += q_q * rpq[d] / r3; in ComputeFieldAtParticles_Coulomb()
H A Dex4.c2167 PetscReal rpq[3], r, r3, q_q; in ComputeFieldAtParticles_Coulomb() local
2170 q_q = ctx->charges[species[q]] * 1.; in ComputeFieldAtParticles_Coulomb()
2175 for (PetscInt d = 0; d < dim; ++d) pE[d] += q_q * rpq[d] / r3; in ComputeFieldAtParticles_Coulomb()