School Assignment--Can this be simplified?

[tmoran@bix.com]

>Question: Why do I need the double( ) around the expression
>-5438.0/dewk+21.72, but not around the literal 2.7183?
  Because the expression is of type "float" (from dewk or tempk)
and your "Pow" function presumably wants a "double" for the
second parameter.  Your first parameter is a numeric literal,
so it would serve OK as either a float or a double.

  Why do you need double precision in a calculation of vapor
pressure?  Is this in the interior of neutron star or something? ;)
Especially when e as given is accurate to only 4 places.  If
the standard Float is not adequate, and you don't want to use an
explicit declaration like "type Real is digits 11;" and
instantiate the needed generics, then check if your compiler
supports the predefined type Long_Float and matching package
Ada.Numerics.Long_Elementary_Functions.

>The trouble is, I need to use the Pow function, so I need with
>ada.numerics.aux. Does this look about right, and could it be
>simplified.
  It would be simpler to use the standard Exp(x) function than the
non-standard Pow(2.7183,x).