Actual source code: petscviennacl.h

petsc-3.11.4 2019-09-28
Report Typos and Errors
  1: #if !defined(PETSCVIENNACL_H)
  2: #define PETSCVIENNACL_H

  4:  #include <petscvec.h>

  6: #if defined(PETSC_HAVE_CUDA)
  7: #define VIENNACL_WITH_CUDA
  8: #endif

 10: #if defined(PETSC_HAVE_OPENCL)
 11: #define VIENNACL_WITH_OPENCL
 12: #endif

 14: #if defined(PETSC_HAVE_OPENMP)
 15: #define VIENNACL_WITH_OPENMP
 16: #endif

 18: #include <viennacl/forwards.h>
 19: #include <viennacl/vector_proxy.hpp>
 20: #include <viennacl/vector.hpp>

 22: PETSC_EXTERN PetscErrorCode VecViennaCLGetArrayReadWrite(Vec v, viennacl::vector<PetscScalar> **a);
 23: PETSC_EXTERN PetscErrorCode VecViennaCLRestoreArrayReadWrite(Vec v, viennacl::vector<PetscScalar> **a);

 25: PETSC_EXTERN PetscErrorCode VecViennaCLGetArrayRead(Vec v, const viennacl::vector<PetscScalar> **a);
 26: PETSC_EXTERN PetscErrorCode VecViennaCLRestoreArrayRead(Vec v, const viennacl::vector<PetscScalar> **a);

 28: PETSC_EXTERN PetscErrorCode VecViennaCLGetArrayWrite(Vec v, viennacl::vector<PetscScalar> **a);
 29: PETSC_EXTERN PetscErrorCode VecViennaCLRestoreArrayWrite(Vec v, viennacl::vector<PetscScalar> **a);


 32: #endif