%% project([[a,b,c],[d,e,f]],a,Column).
%% Column = [a,b,c]

project(Table,Attribute,Column) :-
	member(Column,Table), Column = [Attribute|_Rest].