I'd expect `flexpt' to be the same as `expt', but constrained to flonum arguments, which would make it the same as
(define (flexpt a x) (if (and (flonum? a) (flonum? x)) (expt a x) (error ...s))) I agree that it would make a fine addition to `racket/flonum', but is that what you had in mind? At Sun, 6 May 2012 15:05:07 +0200, Jens Axel Søgaard wrote: > I am missing flexpt in racket/flonum. > > I could live without, and use one of those below. > However it looks as a natural operation to have in racket/flonum. > > (define (flexpt1 a x) > (real->float (expt a x))) > > (define (flexpt2 a x) > (flexp (fl* x (fllog a)))) > > The second is about twice as fast as the second, > but sacrifices numeriacal precision. > > -- > Jens Axel Søgaard > > ____________________ > Racket Users list: > http://lists.racket-lang.org/users ____________________ Racket Users list: http://lists.racket-lang.org/users