Home
last modified time | relevance | path

Searched refs:u_vec (Results 1 – 3 of 3) sorted by relevance

/petsc/src/ts/tutorials/autodiff/adolc-utils/
H A Ddrivers.cxx31 PetscErrorCode PetscAdolcComputeRHSJacobian(PetscInt tag, Mat A, const PetscScalar *u_vec, PetscCtx… in PetscAdolcComputeRHSJacobian() argument
39 if (adctx->Seed) fov_forward(tag, m, n, p, u_vec, adctx->Seed, NULL, J); in PetscAdolcComputeRHSJacobian()
40 else jacobian(tag, m, n, u_vec, J); in PetscAdolcComputeRHSJacobian()
69 PetscErrorCode PetscAdolcComputeRHSJacobianLocal(PetscInt tag, Mat A, const PetscScalar *u_vec, Pet… in PetscAdolcComputeRHSJacobianLocal() argument
77 if (adctx->Seed) fov_forward(tag, m, n, p, u_vec, adctx->Seed, NULL, J); in PetscAdolcComputeRHSJacobianLocal()
78 else jacobian(tag, m, n, u_vec, J); in PetscAdolcComputeRHSJacobianLocal()
108 …cComputeIJacobian(PetscInt tag1, PetscInt tag2, Mat A, const PetscScalar *u_vec, PetscReal a, Pets… in PetscAdolcComputeIJacobian() argument
118 if (adctx->Seed) fov_forward(tag1, m, n, p, u_vec, adctx->Seed, NULL, J); in PetscAdolcComputeIJacobian()
119 else jacobian(tag1, m, n, u_vec, J); in PetscAdolcComputeIJacobian()
134 if (adctx->Seed) fov_forward(tag2, m, n, p, u_vec, adctx->Seed, NULL, J); in PetscAdolcComputeIJacobian()
[all …]
/petsc/src/ts/tutorials/autodiff/
H A Dadr_ex5adj.cxx82 PetscScalar **Seed = NULL, **Rec = NULL, *u_vec; in main() local
163 PetscCall(PetscMalloc1(adctx->n, &u_vec)); in main()
165 jac_pat(1, adctx->m, adctx->n, u_vec, JP, ctrl); in main()
193 PetscCall(PetscFree(u_vec)); in main()
754 const PetscScalar *u_vec; in IJacobianAdolc() local
771 PetscCall(VecGetArrayRead(localU, &u_vec)); in IJacobianAdolc()
776 PetscCall(PetscAdolcComputeIJacobianLocalIDMass(1, A, u_vec, a, appctx->adctx)); in IJacobianAdolc()
781 PetscCall(VecRestoreArrayRead(localU, &u_vec)); in IJacobianAdolc()
1051 PetscScalar *u_vec; in RHSJacobianAdolc() local
1068 PetscCall(VecGetArray(localU, &u_vec)); in RHSJacobianAdolc()
[all …]
/petsc/src/mat/impls/mffd/
H A Dmffd.c1032 PetscScalar *u_vec, *a_vec; in MatMFFDCheckPositivity() local
1041 PetscCall(VecGetArray(U, &u_vec)); in MatMFFDCheckPositivity()
1046 if (PetscRealPart(u_vec[i] + *h * a_vec[i]) <= 0.0) { in MatMFFDCheckPositivity()
1047 val = PetscAbsScalar(u_vec[i] / a_vec[i]); in MatMFFDCheckPositivity()
1051 PetscCall(VecRestoreArray(U, &u_vec)); in MatMFFDCheckPositivity()