Ice Sheet System Model
4.18
Code documentation
src
c
toolkits
petsc
patches
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
Generated on Thu Jul 2 2020 08:09:22 for Ice Sheet System Model by
1.8.19