Database:

part_of(radio_6391, car_117654).

part_of(car_117654, nps_fleet).

owns(nps, nps_fleet).

owns(P,X) :- part_of(X,Y), owns(P,Y).