2: #ifndef __FAYPX_H 5: #include <petscsys.h> 6: #if defined(PETSC_USE_FORTRAN_KERNEL_AYPX) 7: #if defined(PETSC_HAVE_FORTRAN_CAPS) 8: #define fortranaypx_ FORTRANAYPX 9: #elif !defined(PETSC_HAVE_FORTRAN_UNDERSCORE) 10: #define fortranaypx_ fortranaypx 11: #endif 12: PETSC_EXTERN void fortranaypx_(const PetscInt *, const PetscScalar *, const PetscScalar *, PetscScalar *); 13: #endif 14: #endif