% Eye plugin yap_resource

'<http://eulersharp.sourceforge.net/2007/07test/plugin#fahrenheitCelsius>'(X,Z) :-
	when((ground(X); ground(Z)),(getnumber(X,U), Z is (U-32)*5/9, !; getnumber(Z,W), X is W*9/5+32)).