% ...
  Missing = _,
  foreach(P in Perms, Missing = _)
    Found = false,
    foreach(T in P1)
      if P == T then
        Found := true
      end
    end,
    if not Found then
      Missing := P
    end
  end,
  println(missing1=Missing).