Lines Matching refs:m
34 PetscInt i, j, m = adctx->m, n = adctx->n, p = adctx->p; in PetscAdolcComputeRHSJacobian() local
38 PetscCall(AdolcMalloc2(m, p, &J)); in PetscAdolcComputeRHSJacobian()
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()
42 PetscCall(RecoverJacobian(A, INSERT_VALUES, m, p, adctx->Rec, J, NULL)); in PetscAdolcComputeRHSJacobian()
44 for (i = 0; i < m; i++) { in PetscAdolcComputeRHSJacobian()
72 PetscInt i, j, m = adctx->m, n = adctx->n, p = adctx->p; in PetscAdolcComputeRHSJacobianLocal() local
76 PetscCall(AdolcMalloc2(m, p, &J)); in PetscAdolcComputeRHSJacobianLocal()
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()
80 PetscCall(RecoverJacobianLocal(A, INSERT_VALUES, m, p, adctx->Rec, J, NULL)); in PetscAdolcComputeRHSJacobianLocal()
82 for (i = 0; i < m; i++) { in PetscAdolcComputeRHSJacobianLocal()
111 PetscInt i, j, m = adctx->m, n = adctx->n, p = adctx->p; in PetscAdolcComputeIJacobian() local
115 PetscCall(AdolcMalloc2(m, p, &J)); in PetscAdolcComputeIJacobian()
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()
122 PetscCall(RecoverJacobian(A, INSERT_VALUES, m, p, adctx->Rec, J, NULL)); in PetscAdolcComputeIJacobian()
124 for (i = 0; i < m; i++) { in PetscAdolcComputeIJacobian()
134 if (adctx->Seed) fov_forward(tag2, m, n, p, u_vec, adctx->Seed, NULL, J); in PetscAdolcComputeIJacobian()
135 else jacobian(tag2, m, n, u_vec, J); in PetscAdolcComputeIJacobian()
137 PetscCall(RecoverJacobian(A, ADD_VALUES, m, p, adctx->Rec, J, &a)); in PetscAdolcComputeIJacobian()
139 for (i = 0; i < m; i++) { in PetscAdolcComputeIJacobian()
171 PetscInt i, j, m = adctx->m, n = adctx->n, p = adctx->p; in PetscAdolcComputeIJacobianIDMass() local
175 PetscCall(AdolcMalloc2(m, p, &J)); in PetscAdolcComputeIJacobianIDMass()
178 if (adctx->Seed) fov_forward(tag, m, n, p, u_vec, adctx->Seed, NULL, J); in PetscAdolcComputeIJacobianIDMass()
179 else jacobian(tag, m, n, u_vec, J); in PetscAdolcComputeIJacobianIDMass()
182 PetscCall(RecoverJacobian(A, INSERT_VALUES, m, p, adctx->Rec, J, NULL)); in PetscAdolcComputeIJacobianIDMass()
184 for (i = 0; i < m; i++) { in PetscAdolcComputeIJacobianIDMass()
216 PetscInt i, j, m = adctx->m, n = adctx->n, p = adctx->p; in PetscAdolcComputeIJacobianLocal() local
220 PetscCall(AdolcMalloc2(m, p, &J)); in PetscAdolcComputeIJacobianLocal()
223 if (adctx->Seed) fov_forward(tag1, m, n, p, u_vec, adctx->Seed, NULL, J); in PetscAdolcComputeIJacobianLocal()
224 else jacobian(tag1, m, n, u_vec, J); in PetscAdolcComputeIJacobianLocal()
226 PetscCall(RecoverJacobianLocal(A, INSERT_VALUES, m, p, adctx->Rec, J, NULL)); in PetscAdolcComputeIJacobianLocal()
228 for (i = 0; i < m; i++) { in PetscAdolcComputeIJacobianLocal()
238 if (adctx->Seed) fov_forward(tag2, m, n, p, u_vec, adctx->Seed, NULL, J); in PetscAdolcComputeIJacobianLocal()
239 else jacobian(tag2, m, n, u_vec, J); in PetscAdolcComputeIJacobianLocal()
241 PetscCall(RecoverJacobianLocal(A, ADD_VALUES, m, p, adctx->Rec, J, &a)); in PetscAdolcComputeIJacobianLocal()
243 for (i = 0; i < m; i++) { in PetscAdolcComputeIJacobianLocal()
275 PetscInt i, j, m = adctx->m, n = adctx->n, p = adctx->p; in PetscAdolcComputeIJacobianLocalIDMass() local
279 PetscCall(AdolcMalloc2(m, p, &J)); in PetscAdolcComputeIJacobianLocalIDMass()
282 if (adctx->Seed) fov_forward(tag, m, n, p, u_vec, adctx->Seed, NULL, J); in PetscAdolcComputeIJacobianLocalIDMass()
283 else jacobian(tag, m, n, u_vec, J); in PetscAdolcComputeIJacobianLocalIDMass()
285 PetscCall(RecoverJacobianLocal(A, INSERT_VALUES, m, p, adctx->Rec, J, NULL)); in PetscAdolcComputeIJacobianLocalIDMass()
287 for (i = 0; i < m; i++) { in PetscAdolcComputeIJacobianLocalIDMass()
321 PetscInt i, j = 0, m = adctx->m, n = adctx->n, p = adctx->num_params; in PetscAdolcComputeRHSJacobianP() local
326 PetscCall(AdolcMalloc2(m, p, &J)); in PetscAdolcComputeRHSJacobianP()
334 fov_forward(tag, m, n + p, p, concat, S, NULL, J); in PetscAdolcComputeRHSJacobianP()
339 for (i = 0; i < m; i++) { in PetscAdolcComputeRHSJacobianP()
365 PetscInt i, j = 0, m = adctx->m, n = adctx->n, p = adctx->num_params; in PetscAdolcComputeRHSJacobianPLocal() local
370 PetscCall(AdolcMalloc2(m, p, &J)); in PetscAdolcComputeRHSJacobianPLocal()
378 fov_forward(tag, m, n + p, p, concat, S, NULL, J); in PetscAdolcComputeRHSJacobianPLocal()
383 for (i = 0; i < m; i++) { in PetscAdolcComputeRHSJacobianPLocal()
414 PetscInt i, m = adctx->m, n = adctx->n, p = adctx->p; in PetscAdolcComputeIJacobianAndDiagonalLocal() local
418 PetscCall(AdolcMalloc2(m, p, &J)); in PetscAdolcComputeIJacobianAndDiagonalLocal()
421 if (adctx->Seed) fov_forward(tag1, m, n, p, u_vec, adctx->Seed, NULL, J); in PetscAdolcComputeIJacobianAndDiagonalLocal()
422 else jacobian(tag1, m, n, u_vec, J); in PetscAdolcComputeIJacobianAndDiagonalLocal()
424 PetscCall(RecoverDiagonalLocal(diag, INSERT_VALUES, m, adctx->rec, J, NULL)); in PetscAdolcComputeIJacobianAndDiagonalLocal()
426 for (i = 0; i < m; i++) { in PetscAdolcComputeIJacobianAndDiagonalLocal()
434 if (adctx->Seed) fov_forward(tag2, m, n, p, u_vec, adctx->Seed, NULL, J); in PetscAdolcComputeIJacobianAndDiagonalLocal()
435 else jacobian(tag2, m, n, u_vec, J); in PetscAdolcComputeIJacobianAndDiagonalLocal()
437 PetscCall(RecoverDiagonalLocal(diag, ADD_VALUES, m, adctx->rec, J, NULL)); in PetscAdolcComputeIJacobianAndDiagonalLocal()
439 for (i = 0; i < m; i++) { in PetscAdolcComputeIJacobianAndDiagonalLocal()