#include "petscksp.h" #include "petscmat.h" PetscErrorCode KSPGetResidualHistory(KSP ksp,PetscReal *a[],PetscInt *na)Not Collective
| ksp | - iterative context obtained from KSPCreate() |
| a | - pointer to array to hold history (or NULL) | |
| na | - number of used entries in a (or NULL) |
The Fortran version of this routine has a calling sequence
call KSPGetResidualHistory(KSP ksp, integer na, integer ierr)note that you have passed a Fortran array into KSPSetResidualHistory() and you need to access the residual values from this Fortran array you provided. Only the na (number of residual norms currently held) is set.