More generics

More generics

[CheGueVerra]

Now, while continuing playing with generics I was trying to do something
like this

generic
 type T_Cle is private;
 type T_element is private;
 with function "<" (Cle_1 : in T_Cle; Cle_2 : in T_Cle) return Boolean;
 MaxElement : Integer := 10;
package TestGen
...
end TestGen;

Now In the ada file when I try to do

package GenTest is new TestGen(TGen, TCool, "<" , 100);

I get this message that is really not clear for me
Name has no possible Interpretation as a callable entity, but when I take
out the overload of the operator "<" it works fine...  So I guess that I
need to define  ( where is still not clear) the overloaded function "<" for
that error to go away ??? Or am I way far from the track ??

Learning, reading and still trying

CheGueVerra