/* példa az operátor átdefiniálására - precedencia, tipus megadására

Előtte olvassa el az operatorok.pl fájlt, és talán érdemes lenne a 
help ide vonatkozó részét is, bár az lenne az igazi, hogy ha
a próbálgatásokkal párhuzamosan olvasná a help-et.

*/

:-op(300,yfx,(-)).
%:-op(100,yfx,(-)).
%:-op(300,xfy,(-)).
%:-op(100,xfy,(-)).
%:-op(300,xfx,(-)).


/* 
Próbahivás pl.:
	X is 5 - 3 - 2. 
illetve
	 X is 5 - 3 ** 2.

(természetesen közben változtatgatva a kommentezést)

Az első változat a "szokásos" eredményt adja, a többi a definiált
precedenciák függvényében más és más értéket.
*/
