:- initialization(main).

main :-
	N = -0'\1\ ,
	write(N), nl.