Re: generic with function procedure

[Gilbert Gosseyn <hnptz@yahoo.de>]

On Friday, June 5, 2020 at 4:52:13 PM UTC+2, gautier...@hotmail.com wrote:
> It depends on how you have defined g1 and h1...
> You may also want to pass Real as a generic parameter to make your "denm" package work for any precision. Perhaps doing so will solve your problem by the way.
> Here is a package from Mathpaqs, as an inspiration.
> 
> with Ada.Numerics.Generic_Real_Arrays;
> 
> generic
>   type Real is digits <>;
>   with package Real_Arrays is new Ada.Numerics.Generic_Real_Arrays (Real);
>   type Integer_Vector is array (Integer range <>) of Integer;
> 
> package Generic_Real_Linear_Equations is
> 
>   use Real_Arrays;
> 
>   function Linear_Equations ( A : Real_Matrix ;
>                               Y : Real_Vector ) return Real_Vector ;
> ...

I used already:
type Real is digits 18;
package Real_Arrays is instantiated with type Real from above.

Please explain: "It depends on how you have defined g1 and h1...". The functions g1 and h1 are defined in the same manner a f1. If I restrict the numer of with-clauses to one, then there is no error-message.

Thank you for your example. I am still studying it and I can see that it uses different methods in seperate programs with usual parameters. However, there are no functions as parameters involved. As in Ada you cannot use  functions as parameters eg in a procedure, the with clause may be used. My problem is still how to use the with clause correctly?