1module petsctsdef 2 use, intrinsic :: ISO_C_binding 3 use petscsnesdef 4#include "petsc/finclude/petscts.h" 5#include <../ftn/ts/petscts.h> 6end module petsctsdef 7 8module petscts 9 use petscsnes 10 use petsctsdef 11 12#include <../src/ts/ftn-mod/petscts.h90> 13#include <../ftn/ts/petscts.h90> 14 15contains 16 17#include <../ftn/ts/petscts.hf90> 18 19end module petscts 20 21! ---------------------------------------------- 22 23module petsccharacteristic 24 use petscdm 25#include <petsc/finclude/petsccharacteristic.h> 26#include <../ftn/ts/petsccharacteristic.h> 27#include <../ftn/ts/petsccharacteristic.h90> 28contains 29#include <../ftn/ts/petsccharacteristic.hf90> 30end module petsccharacteristic 31