X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FIntegration%2FSimpson.hs;h=f0f57f29245db1a7db7bd10bd05a39a87c2347df;hb=b9df47247151260ce8941562b53c040d779e8d2f;hp=6bfe258eb8e454b7a9dcc0c7221d4638eed3f61f;hpb=cc93d648089344338030a9b79cd7bea7c6e8c997;p=numerical-analysis.git 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@].