Ice Sheet System Model  4.18
Code documentation
VecFree.cpp
Go to the documentation of this file.
1 
5 #ifdef HAVE_CONFIG_H
6  #include <config.h>
7 #else
8 #error "Cannot compile with HAVE_CONFIG_H symbol! run configure first!"
9 #endif
10 
11 /*Petsc includes: */
12 #include <petscmat.h>
13 #include <petscvec.h>
14 #include <petscksp.h>
15 
16 void VecFree(Vec* pvec){
17 
18  #if _PETSC_MAJOR_ < 3 || (_PETSC_MAJOR_ == 3 && _PETSC_MINOR_ < 2)
19  if(*pvec)VecDestroy(*pvec);
20  #else
21  if(*pvec)VecDestroy(pvec);
22  #endif
23  *pvec=NULL;
24 
25 }
VecFree
void VecFree(Vec *pvec)
Definition: VecFree.cpp:16