relation(c1,[city],[string],[["Atlanta"],["Duluth"],["Wichita"],["Dodge City"]]).
relation(c2,[city],[string],[["Carson City"],["Duluth"],["Chennai"]]).
relation(
  suppliers,
  [sno,sname,city],
  [string,string,string],
  [["S1","Jones","Atlanta"],
   ["S2","Smith","Duluth"],
   ["S3","Blake","Marietta"],
   ["S4","Charles","Marietta"],
   ["S5","David","Marietta"]
  ]
).
relation(
  parts,
  [pno,pname,color,city],
  [string,string,string,string],
  [["P1","Nut","Red","Duluth"],
   ["P2","Bolt","Blue","Marietta"],
   ["P3","Screw","Red","Dunwoody"],
   ["P4","Axle","Green","Marietta"]
  ]
).
relation(
  projects,
  [jno,jname,city],
  [string,string,string],
  [["J1","Bicycles","Duluth"],
   ["J2","Motorcycles","Dunwoody"],
   ["J3","Auto","Duluth"]
  ]
).
relation(
  spj,
  [sno,pno,jno,qty],
  [string,string,string,number],
  [["S1","P1","J1",100],
   ["S1","P2","J2",800],
   ["S1","P1","J2",500],
   ["S2","P1","J1",400],
   ["S2","P3","J1",300],
   ["S2","P3","J2",600],
   ["S2","P3","J3",400],
   ["S3","P1","J1",700],
   ["S3","P2","J2",200],
   ["S4","P1","J1",300],
   ["S4","P2","J3",400],
   ["S4","P3","J1",500],
   ["S5","P1","J1",700],
   ["S5","P1","J2",600],
   ["S5","P1","J3",800]
  ]
).