1module petsckspdef 2 use, intrinsic :: ISO_C_binding 3 use petscdmdef 4 5#include <../ftn/ksp/petscall.h> 6end module petsckspdef 7 8! ---------------------------------------------- 9 10module petscksp 11 use petscdm 12 use petsckspdef 13 14#include <../src/ksp/ftn-mod/petscksp.h90> 15#include <../ftn/ksp/petscall.h90> 16 17contains 18 19#include <../ftn/ksp/petscall.hf90> 20 21end module petscksp 22 23