Re: Exponent floats?

[Pascal Obry <pascal@obry.net>]

"Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de> writes:

> with Ada.Numerics.Elementary_Functions;
> use  Ada.Numerics.Elementary_Functions;

Ok.

> > procedure test is
> > 
> > expon: float;
> > Answer: float;
> > Base: float;
> > 
> > begin -- Main Program
> > 	expon := 2.0;
> > 	Base := 2.0;
> > 	Answer := base ** expon;
> 
> Answer := exp (log (base) * expon);

No, No need to change that, see below...

> > 	Ada.Float_Text_IO.put(Answer);
> > 	Ada.Text_IO.new_line;
> > end test;
> 
> ("**" is predefined for only integer powers, see ARM 4.5.6)

Yes, but "**" on floats is defined in Ada.Numerics.Elementary_Functions.

Pascal.

-- 

--|------------------------------------------------------
--| Pascal Obry                           Team-Ada Member
--| 45, rue Gabriel Peri - 78114 Magny Les Hameaux FRANCE
--|------------------------------------------------------
--|              http://www.obry.org
--| "The best way to travel is by means of imagination"
--|
--| gpg --keyserver wwwkeys.pgp.net --recv-key C1082595