Ice Sheet System Model  4.18
Code documentation
Functions
KSPFree.cpp File Reference

wrapper to KSPDestroy More...

#include <petscmat.h>
#include <petscvec.h>
#include <petscksp.h>

Go to the source code of this file.

Functions

void KSPFree (KSP *pksp)
 

Detailed Description

wrapper to KSPDestroy

Definition in file KSPFree.cpp.

Function Documentation

◆ KSPFree()

void KSPFree ( KSP *  pksp)

Definition at line 16 of file KSPFree.cpp.

16  {
17 
18  #if _PETSC_MAJOR_ < 3 || (_PETSC_MAJOR_ == 3 && _PETSC_MINOR_ < 2)
19  if(*pksp)KSPDestroy(*pksp);
20  *pksp=NULL;
21  #else
22  if(*pksp)KSPDestroy(pksp);
23  *pksp=NULL;
24  #endif
25 
26 }