(** import("tactic.lua") **) Variable q : Int -> Int -> Bool. Variable p : Int -> Bool. Axiom Ax (a b : Int) (H : q a b) : p b. Variable a : Int. Theorem T (x : Int) : (q a x) => (p x). (** imp_tac() **). apply (Ax a). exact. done.