1. NEED TO GO THROUGH A FILTER.
Company[
    Department(@dName [KEY]=x1,@dNumber [KEY]=x2)[
        Location(@locationName=x3),
        Controls[
            Project(@pName [KEY]=x4,@pNumber [KEY]=x5,@pLocation=x6){functional}]]]
:-
Project(Y1),Department(Y2),Location(Y3),
locations(Y2,Y3),toDepartment(Y1,Y2),pnumber(Y1,x5),
pname(Y1,x4),plocation(Y1,x6),dnumber(Y2,x2),
dname(Y2,x1),locationName(Y3,x3).