Searched refs:H_k_exp (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ksp/ksp/utils/lmvm/tests/ |
| H A D | ex1.c | 418 Mat H_k_exp; in TestUpdate() local
425 PetscCall(MatDuplicate(H_0, MAT_COPY_VALUES, &H_k_exp)); in TestUpdate()
426 for (PetscInt i = oldest; i < next; i++) PetscCall((*H_update)(H_k_exp, phi, dfs[i], dxs[i])); in TestUpdate()
427 PetscCall(MatNorm(H_k_exp, NORM_FROBENIUS, &norm)); in TestUpdate()
428 PetscCall(MatAXPY(H_k_exp, -1.0, H_k, SAME_NONZERO_PATTERN)); in TestUpdate()
429 PetscCall(MatNorm(H_k_exp, NORM_FROBENIUS, &err)); in TestUpdate()
433 PetscCall(MatDestroy(&H_k_exp)); in TestUpdate()
|