:- object(class,
	instantiates(metaclass)).


	:- public(p1/1).


	p1(class).


:- end_object.