X-Git-Url: http://gitweb.michael.orlitzky.com/?p=numerical-analysis.git;a=blobdiff_plain;f=src%2FIntegration%2FSimpson.hs;h=f0f57f29245db1a7db7bd10bd05a39a87c2347df;hp=6bfe258eb8e454b7a9dcc0c7221d4638eed3f61f;hb=ae914d13235a4582077a5cb2b1edd630d9c6ad62;hpb=6b6bae4206bab66823617e2ba77cdf3e8d3fb752 diff --git a/src/Integration/Simpson.hs b/src/Integration/Simpson.hs index 6bfe258..f0f57f2 100644 --- a/src/Integration/Simpson.hs +++ b/src/Integration/Simpson.hs @@ -1,14 +1,17 @@ +{-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE RebindableSyntax #-} -module Integration.Simpson +module Integration.Simpson ( + simpson, + simpson_1 ) where -import Misc (partition) +import Misc ( partition ) -import NumericPrelude hiding (abs) -import qualified Algebra.RealField as RealField -import qualified Algebra.ToInteger as ToInteger -import qualified Algebra.ToRational as ToRational +import NumericPrelude hiding ( abs ) +import qualified Algebra.RealField as RealField ( C ) +import qualified Algebra.ToInteger as ToInteger ( C ) +import qualified Algebra.ToRational as ToRational ( C ) -- | Use the Simpson's rule to numerically integrate @f@ over the -- interval [@a@, @b@].