:orphan:
# MatMPIAIJRestoreSeqAIJF90
call after `MatMPIAIJGetSeqAIJF90()` when you no longer need access to the matrices and `colmap` 
## Synopsis
```
MatMPIAIJRestoreSeqAIJF90(Mat A, Mat Ad, Mat Ao, {PetscInt, pointer :: colmap(:)},integer ierr)
```
Not Collective


## Input Parameters

- ***A -*** the `MATMPIAIJ` matrix
- ***Ad -*** the diagonal portion of the matrix
- ***Ao -*** the off diagonal portion of the matrix
- ***colmap -*** An array mapping local column numbers of `Ao` to global column numbers of the parallel matrix
- ***ierr -*** error code





## See Also
 [](ch_matrices), `Mat`, [](sec_fortranarrays), `Mat`, `MATMPIAIJ`, `MatMPIAIJGetSeqAIJ()`, `MatMPIAIJGetSeqAIJF90()`

## Level
advanced

## Location
<A HREF="PETSC_DOC_OUT_ROOT_PLACEHOLDER/src/mat/impls/aij/mpi/mpiaij.c.html#MatMPIAIJRestoreSeqAIJF90">src/mat/impls/aij/mpi/mpiaij.c</A>


---
[Edit on GitLab](https://gitlab.com/petsc/petsc/-/edit/release/src/mat/impls/aij/mpi/mpiaij.c)


[Index of all Mat routines](index.md)  
[Table of Contents for all manual pages](/manualpages/index.md)  
[Index of all manual pages](/manualpages/singleindex.md)