[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

Reply via email to