Searched refs:concat (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ts/tutorials/autodiff/adolc-utils/ |
| H A D | drivers.cxx | 322 PetscScalar **J, *concat, **S; in PetscAdolcComputeRHSJacobianP() local
327 PetscCall(PetscMalloc1(n + p, &concat)); in PetscAdolcComputeRHSJacobianP()
330 for (i = 0; i < n; i++) concat[i] = u_vec[i]; in PetscAdolcComputeRHSJacobianP()
331 for (i = 0; i < p; i++) concat[n + i] = params[i]; in PetscAdolcComputeRHSJacobianP()
334 fov_forward(tag, m, n + p, p, concat, S, NULL, J); in PetscAdolcComputeRHSJacobianP()
336 PetscCall(PetscFree(concat)); in PetscAdolcComputeRHSJacobianP()
366 PetscScalar **J, *concat, **S; in PetscAdolcComputeRHSJacobianPLocal() local
371 PetscCall(PetscMalloc1(n + p, &concat)); in PetscAdolcComputeRHSJacobianPLocal()
374 for (i = 0; i < n; i++) concat[i] = u_vec[i]; in PetscAdolcComputeRHSJacobianPLocal()
375 for (i = 0; i < p; i++) concat[n + i] = params[i]; in PetscAdolcComputeRHSJacobianPLocal()
[all …]
|