aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/functions.f907
1 files changed, 7 insertions, 0 deletions
diff --git a/src/functions.f90 b/src/functions.f90
index b028c02..8f0b894 100644
--- a/src/functions.f90
+++ b/src/functions.f90
@@ -2,6 +2,13 @@ MODULE functions
real(kind=8), private, parameter :: poly_coeffs(11) = &
[-11.0, 15.6, -4.6, 22.5, 8.1, 5.1, -0.3, -8.0, 0.0, -9.9, 2.2]
+
+ INTERFACE
+ FUNCTION analytical_integral(ibeg, iend) result(y)
+ real(kind=8), intent(in) :: ibeg, iend
+ real(kind=8) :: y
+ END FUNCTION analytical_integral
+ END INTERFACE
CONTAINS