Actual source code: petscmod.F
1: #define PETSC_USE_FORTRAN_MODULES
3: module petscdef
4: #if defined(PETSC_HAVE_MPI_F90MODULE)
5: use mpi
6: #define PETSC_AVOID_MPIF_H
7: #endif
8: #include "finclude/petsc.h"
9: #include "finclude/petscviewer.h"
10: #include "finclude/ftn-custom/petscviewerdef.h90"
11: #include "finclude/petscdraw.h"
12: #include "finclude/petsclog.h"
13: end module
15: module petsc
16: use petscdef
17: #include "finclude/petscviewer.h90"
18: end module
20: module petscsys
21: use petsc
22: #include "finclude/petscsys.h"
23: end module