 // routine
// bug before  version 1.27 pb passage d'argument
func int myfunction(real  a1)
{
   int i=a1*a1/1;
   return i;
}; 
func real myfunction(real a,real b)
{
   real z =myfunction(a)+b;
   return z;
};
// appele 
cout << myfunction(1.0,3.) << " " << myfunction(1,3)  << endl;
