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: ! ----------------------------------------------
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