Lines Matching refs:coords
149 PetscErrorCode constant(PetscInt dim, PetscReal time, const PetscReal coords[], PetscInt Nc, PetscS… in constant() argument
161 PetscErrorCode constantDer(PetscInt dim, PetscReal time, const PetscReal coords[], const PetscReal … in constantDer() argument
175 PetscErrorCode linear(PetscInt dim, PetscReal time, const PetscReal coords[], PetscInt Nc, PetscSca… in linear() argument
181 for (d = 0; d < Nc; ++d) u[d] = coords[d]; in linear()
183 u[0] = coords[d]; in linear()
187 PetscErrorCode linearDer(PetscInt dim, PetscReal time, const PetscReal coords[], const PetscReal n[… in linearDer() argument
205 PetscErrorCode quadratic(PetscInt dim, PetscReal time, const PetscReal coords[], PetscInt Nc, Petsc… in quadratic() argument
212 u[0] = coords[0] * coords[1]; in quadratic()
213 u[1] = coords[1] * coords[2]; in quadratic()
214 u[2] = coords[2] * coords[0]; in quadratic()
216 u[0] = coords[0] * coords[0]; in quadratic()
217 u[1] = coords[0] * coords[1]; in quadratic()
220 u[0] = coords[d] * coords[d]; in quadratic()
224 PetscErrorCode quadraticDer(PetscInt dim, PetscReal time, const PetscReal coords[], const PetscReal… in quadraticDer() argument
231 u[0] = coords[1] * n[0] + coords[0] * n[1]; in quadraticDer()
232 u[1] = coords[2] * n[1] + coords[1] * n[2]; in quadraticDer()
233 u[2] = coords[2] * n[0] + coords[0] * n[2]; in quadraticDer()
235 u[0] = 2.0 * coords[0] * n[0]; in quadraticDer()
236 u[1] = coords[1] * n[0] + coords[0] * n[1]; in quadraticDer()
239 u[0] = 2.0 * coords[d] * n[d]; in quadraticDer()
245 PetscErrorCode cubic(PetscInt dim, PetscReal time, const PetscReal coords[], PetscInt Nc, PetscScal… in cubic() argument
252 u[0] = coords[0] * coords[0] * coords[1]; in cubic()
253 u[1] = coords[1] * coords[1] * coords[2]; in cubic()
254 u[2] = coords[2] * coords[2] * coords[0]; in cubic()
256 u[0] = coords[0] * coords[0] * coords[0]; in cubic()
257 u[1] = coords[0] * coords[0] * coords[1]; in cubic()
260 u[0] = coords[d] * coords[d] * coords[d]; in cubic()
264 PetscErrorCode cubicDer(PetscInt dim, PetscReal time, const PetscReal coords[], const PetscReal n[]… in cubicDer() argument
271 u[0] = 2.0 * coords[0] * coords[1] * n[0] + coords[0] * coords[0] * n[1]; in cubicDer()
272 u[1] = 2.0 * coords[1] * coords[2] * n[1] + coords[1] * coords[1] * n[2]; in cubicDer()
273 u[2] = 2.0 * coords[2] * coords[0] * n[2] + coords[2] * coords[2] * n[0]; in cubicDer()
275 u[0] = 3.0 * coords[0] * coords[0] * n[0]; in cubicDer()
276 u[1] = 2.0 * coords[0] * coords[1] * n[0] + coords[0] * coords[0] * n[1]; in cubicDer()
279 u[0] = 3.0 * coords[d] * coords[d] * n[d]; in cubicDer()
285 PetscErrorCode quartic(PetscInt dim, PetscReal time, const PetscReal coords[], PetscInt Nc, PetscSc… in quartic() argument
292 u[0] = coords[0] * coords[0] * coords[1] * coords[1]; in quartic()
293 u[1] = coords[1] * coords[1] * coords[2] * coords[2]; in quartic()
294 u[2] = coords[2] * coords[2] * coords[0] * coords[0]; in quartic()
296 u[0] = coords[0] * coords[0] * coords[0] * coords[0]; in quartic()
297 u[1] = coords[0] * coords[0] * coords[1] * coords[1]; in quartic()
300 u[0] = coords[d] * coords[d] * coords[d] * coords[d]; in quartic()
304 PetscErrorCode quarticDer(PetscInt dim, PetscReal time, const PetscReal coords[], const PetscReal n… in quarticDer() argument
311 …u[0] = 2.0 * coords[0] * coords[1] * coords[1] * n[0] + 2.0 * coords[0] * coords[0] * coords[1] * … in quarticDer()
312 …u[1] = 2.0 * coords[1] * coords[2] * coords[2] * n[1] + 2.0 * coords[1] * coords[1] * coords[2] * … in quarticDer()
313 …u[2] = 2.0 * coords[2] * coords[0] * coords[0] * n[2] + 2.0 * coords[2] * coords[2] * coords[0] * … in quarticDer()
315 u[0] = 4.0 * coords[0] * coords[0] * coords[0] * n[0]; in quarticDer()
316 …u[1] = 2.0 * coords[0] * coords[1] * coords[1] * n[0] + 2.0 * coords[0] * coords[0] * coords[1] * … in quarticDer()
319 u[0] = 4.0 * coords[d] * coords[d] * coords[d] * n[d]; in quarticDer()
324 PetscErrorCode mytanh(PetscInt dim, PetscReal time, const PetscReal coords[], PetscInt Nc, PetscSca… in mytanh() argument
330 for (d = 0; d < Nc; ++d) u[d] = PetscTanhReal(coords[d] - 0.5); in mytanh()
332 u[0] = PetscTanhReal(coords[d] - 0.5); in mytanh()
336 PetscErrorCode mytanhDer(PetscInt dim, PetscReal time, const PetscReal coords[], const PetscReal n[… in mytanhDer() argument
342 for (d = 0; d < Nc; ++d) u[d] = 1.0 / PetscSqr(PetscCoshReal(coords[d] - 0.5)) * n[d]; in mytanhDer()
344 u[0] = 1.0 / PetscSqr(PetscCoshReal(coords[d] - 0.5)) * n[d]; in mytanhDer()
349 PetscErrorCode trig(PetscInt dim, PetscReal time, const PetscReal coords[], PetscInt Nc, PetscScala… in trig() argument
355 for (d = 0; d < Nc; ++d) u[d] = PetscSinReal(PETSC_PI * m * coords[d]); in trig()
357 u[0] = PetscSinReal(PETSC_PI * m * coords[d]); in trig()
361 PetscErrorCode trigDer(PetscInt dim, PetscReal time, const PetscReal coords[], const PetscReal n[],… in trigDer() argument
367 for (d = 0; d < Nc; ++d) u[d] = PETSC_PI * m * PetscCosReal(PETSC_PI * m * coords[d]) * n[d]; in trigDer()
369 u[0] = PETSC_PI * m * PetscCosReal(PETSC_PI * m * coords[d]) * n[d]; in trigDer()