#if !defined(__FSOLVE_H) #include #if defined(PETSC_USE_FORTRAN_KERNEL_SOLVEAIJ) #if defined(PETSC_HAVE_FORTRAN_CAPS) #define fortransolveaij_ FORTRANSOLVEAIJ #elif !defined(PETSC_HAVE_FORTRAN_UNDERSCORE) #define fortransolveaij_ fortransolveaij #endif PETSC_EXTERN void fortransolveaij_(const PetscInt*,void*,const PetscInt*,const PetscInt*,const PetscInt*,const void*,const void*); #endif #endif