1*a4963045SJacob Faibussowitsch #pragma once 23ea99036SJacob Faibussowitsch 3c6db04a5SJed Brown #include <petscsys.h> 4823b3129SBarry Smith #if defined(PETSC_USE_FORTRAN_KERNEL_SOLVEAIJ) 5823b3129SBarry Smith #if defined(PETSC_HAVE_FORTRAN_CAPS) 6823b3129SBarry Smith #define fortransolveaij_ FORTRANSOLVEAIJ 7823b3129SBarry Smith #elif !defined(PETSC_HAVE_FORTRAN_UNDERSCORE) 8823b3129SBarry Smith #define fortransolveaij_ fortransolveaij 9823b3129SBarry Smith #endif 109f7953f8SBarry Smith 118cc058d9SJed Brown PETSC_EXTERN void fortransolveaij_(const PetscInt *, void *, const PetscInt *, const PetscInt *, const PetscInt *, const void *, const void *); 129f7953f8SBarry Smith 13823b3129SBarry Smith #endif 14