:- use_module(library(dom)).
mortal(X) :- man(X).
man(socrates).
my_rel :-
	mortal(X),
	get_by_id(example, Example),
	create(p, P),
	html(P, X),
	append_child(Example, P).