app([],U,U).
app([U|V],Y,[U|Z]) :-
	app(V,Y,Z).
