% ...
  println(missing3=difference(Perms,P1)).

difference(Xs,Ys) = findall(X,(member(X,Xs),not(member(X,Ys)))).