haskell-te: 0f5d415e24e61fc09f5447f1ea6c192d4d07baac

     1: (assert-not (par (t) (forall ((a (Pair t)))
     2:   (= (swap (swap a)) a))))