:- initialization(main).

main :-
	number_chars(N,"0'\\a"),
	write(N), nl.