[EMAIL PROTECTED] wrote:
> [...]
> > %fun mirror :: Polar -> Polar
> > %call (< polarToCart / cartToPolar > (int x) (int y))
> > %code x = -x;
> > % y = -y;
> > %result (< polarToCart / cartToPolar > (int x) (int y))
The variable names x and y are not "local enough", so you should try:
%fun mirror :: Polar -> Polar
%call (< polarToCart / cartToPolar > (int x) (int y))
%code a = -x;
% b = -y;
%result (< polarToCart / cartToPolar > (int a) (int b))
Cheers,
Sven
--
Sven Panne Tel.: +49/89/2178-2235
LMU, Institut fuer Informatik FAX : +49/89/2178-2211
LFE Programmier- und Modellierungssprachen Oettingenstr. 67
mailto:[EMAIL PROTECTED] D-80538 Muenchen
http://www.pms.informatik.uni-muenchen.de/mitarbeiter/panne