predicate(start/0
	put_constant 'hej' 0
	put_definition 'halt'/0 2
	put_definition 'nl'/1 1
	unify_value 2
	execute 'display'/2
)

predicate('halt'/0
	halt
)
