Actual source code: vecregall.c

petsc-3.14.0 2020-09-29
Report Typos and Errors

  2: #include <petscvec.h>
  3: #include <petsc/private/vecimpl.h>
  4: PETSC_EXTERN PetscErrorCode VecCreate_Seq(Vec);
  5: PETSC_EXTERN PetscErrorCode VecCreate_MPI(Vec);
  6: PETSC_EXTERN PetscErrorCode VecCreate_Standard(Vec);
  7: PETSC_EXTERN PetscErrorCode VecCreate_Shared(Vec);
  8: #if defined(PETSC_HAVE_MPI_PROCESS_SHARED_MEMORY)
  9: PETSC_EXTERN PetscErrorCode VecCreate_Node(Vec);
 10: #endif
 11: #if defined(PETSC_HAVE_VIENNACL)
 12: PETSC_EXTERN PetscErrorCode VecCreate_SeqViennaCL(Vec);
 13: PETSC_EXTERN PetscErrorCode VecCreate_MPIViennaCL(Vec);
 14: PETSC_EXTERN PetscErrorCode VecCreate_ViennaCL(Vec);
 15: #endif
 16: #if defined(PETSC_HAVE_CUDA)
 17: PETSC_EXTERN PetscErrorCode VecCreate_SeqCUDA(Vec);
 18: PETSC_EXTERN PetscErrorCode VecCreate_MPICUDA(Vec);
 19: PETSC_EXTERN PetscErrorCode VecCreate_CUDA(Vec);
 20: #endif
 21: #if defined(PETSC_HAVE_KOKKOS_KERNELS)
 22: PETSC_EXTERN PetscErrorCode VecCreate_SeqKokkos(Vec);
 23: PETSC_EXTERN PetscErrorCode VecCreate_MPIKokkos(Vec);
 24: PETSC_EXTERN PetscErrorCode VecCreate_Kokkos(Vec);
 25: #endif

 27: /*@C
 28:   VecRegisterAll - Registers all of the vector components in the Vec package.

 30:   Not Collective

 32:   Level: advanced

 34: .seealso:  VecRegister(), VecRegisterDestroy(), VecRegister()
 35: @*/
 36: PetscErrorCode VecRegisterAll(void)
 37: {

 41:   if (VecRegisterAllCalled) return(0);
 42:   VecRegisterAllCalled = PETSC_TRUE;

 44:   VecRegister(VECSEQ,        VecCreate_Seq);
 45:   VecRegister(VECMPI,        VecCreate_MPI);
 46:   VecRegister(VECSTANDARD,   VecCreate_Standard);
 47:   VecRegister(VECSHARED,     VecCreate_Shared);
 48: #if defined PETSC_HAVE_MPI_PROCESS_SHARED_MEMORY
 49:   VecRegister(VECNODE,       VecCreate_Node);
 50: #endif
 51: #if defined PETSC_HAVE_VIENNACL
 52:   VecRegister(VECSEQVIENNACL,    VecCreate_SeqViennaCL);
 53:   VecRegister(VECMPIVIENNACL,    VecCreate_MPIViennaCL);
 54:   VecRegister(VECVIENNACL,       VecCreate_ViennaCL);
 55: #endif
 56: #if defined(PETSC_HAVE_CUDA)
 57:   VecRegister(VECSEQCUDA,    VecCreate_SeqCUDA);
 58:   VecRegister(VECMPICUDA,    VecCreate_MPICUDA);
 59:   VecRegister(VECCUDA,       VecCreate_CUDA);
 60: #endif
 61: #if defined(PETSC_HAVE_KOKKOS_KERNELS)
 62:   VecRegister(VECSEQKOKKOS,  VecCreate_SeqKokkos);
 63:   VecRegister(VECMPIKOKKOS,  VecCreate_MPIKokkos);
 64:   VecRegister(VECKOKKOS,     VecCreate_Kokkos);
 65: #endif
 66:   return(0);
 67: }