A question on function calls and defs.

["mcdoobie" <chainsaw.two.thousand@nospam.dot.home.dot.com>]

Alright so I have this code that looks like this...

with Ada.Text_IO, Ada.Float_Text_IO;
use Ada.Text_IO, Ada.Float_Text_IO;

procedure simplemath is

begin
-- The rest of the code to the program would be here --

-- This is the section I have a question on --
if opt_is = 'V'
	then Put( Hi_prompt );
		Get( aHeight );
		the_volume := find_volume( aLength, aWidth, aHeight );  - Trouble here -
		NEW_LINE;
----- Cut to the Function itself -----

function find_volume( aLength, aWidth, aHeight : float ) return float is
	volume : float
	begin
		volume := aLength * aWidth * aHeight;
	return volume;
end find_volume;
end simplemath;

As you can probably tell, this is a pretty damn simple program. I'm
writing it just for practice with Ada95.

Now, the problem I'm having is that when I attempt to compile this code
it tells me that in my call to the "find_volume" function I have too many
arguments in the call. I'm not at all sure what that means. I'm searching
the compiler docs to find out, however a little insight would be
appreciated.

Now, at the function definition I'm getting the error that it's "not type
conformant" with my simplemath.ads file.(I did write an .ads file which I
used to generate a stub file which was then filled in with code. A really
nice touch to the language suite if you ask me. )
Now, I doubt anyone would want me to upload an entire .ads file to the
newsgroup( or would they?) however I'm assuming that the error message
itself is self-revealing to regular Ada programmers. Could someone point
me in the right direction on this one?

Should I upload the entire source to the newsgroup? Or would that be
considered rude?

Thanks in advance.

mcdoobie
mcdoobie@home.com