diff options
| author | Thomas Albers Raviola <thomas@thomaslabs.org> | 2024-05-05 23:31:27 +0200 |
|---|---|---|
| committer | Thomas Albers Raviola <thomas@thomaslabs.org> | 2024-05-05 23:31:27 +0200 |
| commit | 055ed6e70738cf9e18e3f983c003a87eae1e4aaa (patch) | |
| tree | 1caf094e4749219ff15294c8da3faff0b3fb09e9 /src/integral.f90 | |
| parent | 8e30cb8d4c1caffc2d877bec6975f1539fc193d3 (diff) | |
Diffstat (limited to 'src/integral.f90')
| -rw-r--r-- | src/integral.f90 | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/src/integral.f90 b/src/integral.f90 deleted file mode 100644 index 859d880..0000000 --- a/src/integral.f90 +++ /dev/null @@ -1,22 +0,0 @@ -module integral - use common, only : dp - implicit none - - public - - interface - real(dp) pure function ivp_func(t, y) - import :: dp - real(dp), intent(in) :: t, y - end function ivp_func - ! module procedure :: rk4 - end interface -contains - real(dp) function rk4 (x) result(y) - real(dp), intent(in) :: x - y = x - end function rk4 - - ! pure function rk4() - ! end function rk4 -end module integral |