Library Mtac2Tests.trace
From Mtac2 Require Import Base Datatypes.
Goal True.
MProof.
M.ret I.
Qed.
Import M.notations.
Goal forall P:Type, forall x: P, P.
MProof.
Mtac Do Set_Trace.
M.nu Generate mNone (fun P:Type=>M.nu Generate mNone (fun x:P=> M.abs_fun x x >>= M.abs_fun P)).
Mtac Do Unset_Trace.
Qed.
Goal True.
MProof.
M.ret I. Qed.
Goal True.
MProof.
M.ret I.
Qed.
Import M.notations.
Goal forall P:Type, forall x: P, P.
MProof.
Mtac Do Set_Trace.
M.nu Generate mNone (fun P:Type=>M.nu Generate mNone (fun x:P=> M.abs_fun x x >>= M.abs_fun P)).
Mtac Do Unset_Trace.
Qed.
Goal True.
MProof.
M.ret I. Qed.