PetscSmartObj.cpp File Reference

Implementation of smart pointer for PETSc objects. More...

Go to the source code of this file.

Functions
template<>
void	intrusive_ptr_release< Vec > (Vec obj)
template<>
void	intrusive_ptr_release< Mat > (Mat obj)
template<>
void	intrusive_ptr_release< DM > (DM obj)
template<>
void	intrusive_ptr_release< IS > (IS obj)
template<>
void	intrusive_ptr_release< AO > (AO obj)
template<>
void	intrusive_ptr_release< KSP > (KSP obj)
template<>
void	intrusive_ptr_release< SNES > (SNES obj)
template<>
void	intrusive_ptr_release< TS > (TS obj)
template<>
void	intrusive_ptr_release< Tao > (Tao obj)

Detailed Description

Implementation of smart pointer for PETSc objects.

Author

Anonymous author(s) committing under MIT license

Definition in file PetscSmartObj.cpp.

Function Documentation

intrusive_ptr_release< AO >()

template<>

void intrusive_ptr_release< AO >

(

AO

obj

)

Definition at line 59 of file PetscSmartObj.cpp.

                                                   {
  int cnt = 0;
  PetscErrorCode ierr =
      PetscObjectGetReference(MoFEM::getPetscObject(obj), &cnt);
  if (!ierr) {
    if (cnt) {
      ierr = AODestroy(&obj);
      auto comm = PetscObjectComm(MoFEM::getPetscObject(obj));
      CHKERRABORT(comm, ierr);
    }
  }
}

intrusive_ptr_release< DM >()

template<>

void intrusive_ptr_release< DM >

(

DM

obj

)

Definition at line 33 of file PetscSmartObj.cpp.

                                                   {
  int cnt = 0;
  PetscErrorCode ierr =
      PetscObjectGetReference(MoFEM::getPetscObject(obj), &cnt);
  if (!ierr) {
    if (cnt) {
      ierr = DMDestroy(&obj);
      auto comm = PetscObjectComm(MoFEM::getPetscObject(obj));
      CHKERRABORT(comm, ierr);
    }
  }
}

intrusive_ptr_release< IS >()

template<>

void intrusive_ptr_release< IS >

(

IS

obj

)

Definition at line 46 of file PetscSmartObj.cpp.

                                                   {
  int cnt = 0;
  PetscErrorCode ierr =
      PetscObjectGetReference(MoFEM::getPetscObject(obj), &cnt);
  if (!ierr) {
    if (cnt) {
      ierr = ISDestroy(&obj);
      auto comm = PetscObjectComm(MoFEM::getPetscObject(obj));
      CHKERRABORT(comm, ierr);
    }
  }
}

intrusive_ptr_release< KSP >()

template<>

void intrusive_ptr_release< KSP >

(

KSP

obj

)

Definition at line 72 of file PetscSmartObj.cpp.

                                                     {
  int cnt = 0;
  PetscErrorCode ierr =
      PetscObjectGetReference(MoFEM::getPetscObject(obj), &cnt);
  if (!ierr) {
    if (cnt) {
      ierr = KSPDestroy(&obj);
      auto comm = PetscObjectComm(MoFEM::getPetscObject(obj));
      CHKERRABORT(comm, ierr);
    }
  }
}

intrusive_ptr_release< Mat >()

template<>

void intrusive_ptr_release< Mat >

(

Mat

obj

)

Definition at line 20 of file PetscSmartObj.cpp.

                                                     {
  int cnt = 0;
  PetscErrorCode ierr =
      PetscObjectGetReference(MoFEM::getPetscObject(obj), &cnt);
  if (!ierr) {
    if (cnt) {
      ierr = MatDestroy(&obj);
      auto comm = PetscObjectComm(MoFEM::getPetscObject(obj));
      CHKERRABORT(comm, ierr);
    }
  }
}

intrusive_ptr_release< SNES >()

template<>

void intrusive_ptr_release< SNES >

(

SNES

obj

)

Definition at line 85 of file PetscSmartObj.cpp.

                                                       {
  int cnt = 0;
  PetscErrorCode ierr =
      PetscObjectGetReference(MoFEM::getPetscObject(obj), &cnt);
  if (!ierr) {
    if (cnt) {
      ierr = SNESDestroy(&obj);
      auto comm = PetscObjectComm(MoFEM::getPetscObject(obj));
      CHKERRABORT(comm, ierr);
    }
  }
}

intrusive_ptr_release< Tao >()

template<>

void intrusive_ptr_release< Tao >

(

Tao

obj

)

Definition at line 111 of file PetscSmartObj.cpp.

                                                     {
  int cnt = 0;
  PetscErrorCode ierr =
      PetscObjectGetReference(MoFEM::getPetscObject(obj), &cnt);
  if (!ierr) {
    if (cnt) {
      ierr = TaoDestroy(&obj);
      auto comm = PetscObjectComm(MoFEM::getPetscObject(obj));
      CHKERRABORT(comm, ierr);
    }
  }
}

intrusive_ptr_release< TS >()

template<>

void intrusive_ptr_release< TS >

(

TS

obj

)

Definition at line 98 of file PetscSmartObj.cpp.

                                                   {
  int cnt = 0;
  PetscErrorCode ierr =
      PetscObjectGetReference(MoFEM::getPetscObject(obj), &cnt);
  if (!ierr) {
    if (cnt) {
      ierr = TSDestroy(&obj);
      auto comm = PetscObjectComm(MoFEM::getPetscObject(obj));
      CHKERRABORT(comm, ierr);
    }
  }
}

intrusive_ptr_release< Vec >()

template<>

void intrusive_ptr_release< Vec >

(

Vec

obj

)

Definition at line 7 of file PetscSmartObj.cpp.

                                                     {
  int cnt = 0;
  PetscErrorCode ierr =
      PetscObjectGetReference(MoFEM::getPetscObject(obj), &cnt);
  if (!ierr) {
    if (cnt) {
      ierr = VecDestroy(&obj);
      auto comm = PetscObjectComm(MoFEM::getPetscObject(obj));
      CHKERRABORT(comm, ierr);
    }
  }
}