Actual source code: petsckspmod.F90

  1: module petsckspdef
  2:   use, intrinsic :: ISO_C_binding
  3:   use petscdmdef

  5: #include <../ftn/ksp/petscall.h>
  6: end module petsckspdef

  8: !     ----------------------------------------------

 10: module petscksp
 11:   use petscdm
 12:   use petsckspdef

 14: #include <../src/ksp/ftn-mod/petscksp.h90>
 15: #include <../ftn/ksp/petscall.h90>

 17: contains

 19: #include <../ftn/ksp/petscall.hf90>

 21: end module petscksp