:- object(lgtredef).
		
	current_object(_).
	
:- end_object.