Actual source code: petscmlmod.F90

      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: module petscmldef
     22:   use petscregressordef
     23: #include <petsc/finclude/petscml.h>
     24: end module petscmldef

     26: module petscml
     27:   use petscregressor
     28:   use petscmldef
     29: end module petscml