Modulenumeric-prelude-0.4.4Haskell98
MathObj.PowerSeries.Example
Contents
Synopsis
- value recip
- value exp
- value sin
- value cos
- value tan
- value log
- value asin
- value acos
- value atan
- value sinh
- value cosh
- value atanh
- value pow
- value sqrt
- value recipExpl
- value expExpl
- value sinExpl
- value cosExpl
- value tanExpl
- value tanExplSieve
- value logExpl
- value atanExpl
- value sinhExpl
- value coshExpl
- value atanhExpl
- value powExpl
- value sqrtExpl
- value erf
- value expODE
- value sinODE
- value cosODE
- value tanODE
- value tanODESieve
- value logODE
- value recipCircle
- value asinODE
- value atanODE
- value sqrtODE
- value acosODE
- value sinhODE
- value coshODE
- value atanhODE
- value powODE
- Packagenumeric-prelude-0.4.4
- Exports43
- LanguageHaskell98
- LicenceBSD-3-Clause
- SourceExample.hs
import qualified MathObj.PowerSeries.Core as PSimport qualified MathObj.PowerSeries.Example as PSEimport Test.NumericPrelude.Utility (equalTrunc)import NumericPrelude.Numeric as NPimport NumericPrelude.Base as Pimport Prelude ()
Default implementations.
\m n -> equalTrunc 30 (PS.mul (PSE.pow m) (PSE.pow n)) (PSE.pow (m+n))Generate Taylor series explicitly.
equalTrunc 500 PSE.expExpl PSE.expODEequalTrunc 500 PSE.sinExpl PSE.sinODEequalTrunc 500 PSE.cosExpl PSE.cosODEequalTrunc 50 PSE.tanExpl PSE.tanODEequalTrunc 50 PSE.tanExpl PSE.tanExplSieveequalTrunc 500 PSE.logExpl PSE.logODEequalTrunc 500 PSE.atanExpl PSE.atanODEequalTrunc 500 PSE.sinhExpl PSE.sinhODEequalTrunc 500 PSE.coshExpl PSE.coshODEequalTrunc 500 PSE.atanhExpl PSE.atanhODEPower series of (1+x)^expon using the binomial series.
\expon -> equalTrunc 50 (PSE.powODE expon) (PSE.powExpl expon)equalTrunc 100 PSE.sqrtExpl PSE.sqrtODEPower series of error function (almost).
More precisely erf = 2 / sqrt pi * integrate (x -> exp (-x^2)) ,
with erf 0 = 0.
Generate Taylor series from differential equations.
equalTrunc 50 PSE.tanODE PSE.tanODESieveequalTrunc 50 PSE.asinODE (snd $ PS.inv PSE.sinODE)