#pragma once #include #if defined(PETSC_USE_FORTRAN_KERNEL_MULTCRL) #if defined(PETSC_HAVE_FORTRAN_CAPS) #define fortranmultcrl_ FORTRANMULTCRL #elif !defined(PETSC_HAVE_FORTRAN_UNDERSCORE) #define fortranmultcrl_ fortranmultcrl #endif PETSC_EXTERN void fortranmultcrl_(PetscInt *, PetscInt *, const PetscScalar *, PetscScalar *, PetscInt *, PetscScalar *); #endif