fortran_interface.h

Go to the documentation of this file.

//
// This file is subject to the terms and conditions defined in
// file 'LICENSE', which is part of this source code package.
//
 
#pragma once
 
#ifdef __cplusplus
extern "C" {
#endif
 
/* ------------------------------------------------------------------ */
/* Selector constants (match PACMAN::ExecSpaces / RbfFunctions /      */
/* TransferMethods — do not rely on raw values, use these names).     */
/* ------------------------------------------------------------------ */
 
enum PACMAN_ExecSpace {
  PACMAN_SERIAL = 0x00,
  PACMAN_OPENMP = 0x01,
  PACMAN_THREADS = 0x02,
  PACMAN_CUDA = 0x03,
  PACMAN_HIP = 0x04,
  PACMAN_SYCL = 0x05
};
 
enum PACMAN_RbfFunction {
  PACMAN_WENDLANDC0 = 0x10,
  PACMAN_WENDLANDC2 = 0x11,
  PACMAN_WENDLANDC4 = 0x12,
  PACMAN_WENDLANDC6 = 0x13,
  PACMAN_WENDLANDC8 = 0x14
};
 
enum PACMAN_FeMethod {
  PACMAN_FE_NEAREST_NEAREST = 0xF0,
  PACMAN_FE_INTERP_CLAMP = 0xF1,
  PACMAN_FE_INTERP_NEAREST = 0xF2,
  PACMAN_FE_INTERP_ZEROFILL = 0xF3,
  PACMAN_FE_INTERP_EXTRAP = 0xF4,
  PACMAN_MLS = 0xF6
};
 
/* ------------------------------------------------------------------ */
/* Kokkos lifecycle                                                    */
/* ------------------------------------------------------------------ */
 
void pacman_kokkos_initialize_c(void);
 
void pacman_kokkos_finalize_c(void);
 
int pacman_best_execspace_c(void);
 
/* ------------------------------------------------------------------ */
/* RBF-PUM interpolation                                              */
/* ------------------------------------------------------------------ */
 
int pacman_rbf_interpolate_c(int spaceDimension, int execSpace, int rbfFunction,
                             const double *sourcePoints, int nSourcePoints,
                             const double *sourceValues,
                             const double *targetPoints, int nTargetPoints,
                             double *targetValues);
 
/* ------------------------------------------------------------------ */
/* FE interpolation                                                   */
/* ------------------------------------------------------------------ */
 
int pacman_fe_interpolate_c(int spaceDimension, int execSpace, int method,
                            const double *sourcePoints, int nSourcePoints,
                            const double *sourceValues, const int *connVal,
                            int connValSize, const int *connOff,
                            int connOffSize, const int *cellTypes,
                            const double *targetPoints, int nTargetPoints,
                            double *targetValues, int *targetStatus);
 
/* ------------------------------------------------------------------ */
/* MLS interpolation                                                   */
/* ------------------------------------------------------------------ */
 
int pacman_mls_interpolate_c(int spaceDimension, int execSpace,
                             const double *sourcePoints, int nSourcePoints,
                             const double *sourceValues,
                             const double *targetPoints, int nTargetPoints,
                             double *targetValues);
 
/* ------------------------------------------------------------------ */
/* Cell-type helpers                                                   */
/* ------------------------------------------------------------------ */
 
int pacman_vtk_to_pacman_cell_type_c(const int *vtkTypes, int *pacmanTypes,
                                     int n);
 
int pacman_vtk_cell_dim_c(int vtkCellType);
 
#ifdef __cplusplus
}
#endif