?-
rename(suppliers,[sno,x,c1],t31),
rename(parts,[pno,y,z,c2],t32),
times(t31,t32,t33),
rename(projects,[jno,u,c3],t34),
times(t33,t34,t35),
select(t35,[[c1,'<>',c2]],t36),
project(t36,[sno,pno,jno],t37),
%
rename(suppliers,[sno,x,c1],u31),
rename(parts,[pno,y,z,c2],u32),
times(u31,u32,u33),
rename(projects,[jno,u,c3],u34),
times(u33,u34,u35),
select(u35,[[c1,'<>',c3]],u36),
project(u36,[sno,pno,jno],u37),
%
rename(suppliers,[sno,x,c1],v31),
rename(parts,[pno,y,z,c2],v32),
times(v31,v32,v33),
rename(projects,[jno,u,c3],v34),
times(v33,v34,v35),
select(v35,[[c1,'<>',c3]],v36),
project(v36,[sno,pno,jno],v37),
%
unionRA(t37,u37,w1),
unionRA(w1,v37,w),
displayRelation(w).
