Re: Trigonometric math functions

*To*: mathgroup at smc.vnet.net*Subject*: [mg44584] Re: Trigonometric math functions*From*: drbob at bigfoot.com (Bobby R. Treat)*Date*: Sat, 15 Nov 2003 02:05:13 -0500 (EST)*References*: <boig47$og2$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

You can get a very good rational function approximation as follows: << Calculus`Pade` << Graphics`Colors` pade = Pade[ArcCos[x], {x, 0, 6, 6}] // Simplify series = Normal@Series[ArcCos[x], {x, 0, 19}] Plot[{pade, series} - ArcCos[x] // Evaluate, {x, 0, 1}, PlotStyle -> {Red, Blue}] The Pade approximation of order {6,6} looks better than the series of order 19. Bobby "Bruno" <bpa at BPASoftware.com> wrote in message news:<boig47$og2$1 at smc.vnet.net>... > Hi all, > > I would like to implement an arc cos function on a 16 bits µcontroller > (optimized sin() and cos() function are welcome). > > Does someone have some sources or an algorythm in this way ? > > Thanks in advance, > > Regards.