1:         module petscregressordef
  2: use, intrinsic :: ISO_C_binding
  3:         use petsctaodef
  4: #include <petsc/finclude/petscregressor.h>
  5: #include <../ftn/ml/petscregressor.h>

  7:         end module petscregressordef

  9:         module petscregressor
 10:         use petscregressordef
 11:         use petsctao

 13: #include <../ftn/ml/petscregressor.h90>

 15:         contains

 17: #include <../ftn/ml/petscregressor.hf90>

 19:       end module petscregressor

 21: !     ----------------------------------------------

 23:         module petscmldef
 24:         use petscregressordef
 25: #include <petsc/finclude/petscml.h>
 26:         end module petscmldef

 28: !     ----------------------------------------------

 30:         module petscml
 31:         use petscregressor
 32:         use petscmldef
 33:       end module petscml