inductive PEq (Q1:Context) (p1:Proof) (Q2:Context) (p2:Proof): Prop \def
| peq_intro: Q1 = Q2 \land p1 = p2 \to PEq Q1 p1 Q2 p2
inductive PEq (Q1:Context) (p1:Proof) (Q2:Context) (p2:Proof): Prop \def
| peq_intro: Q1 = Q2 \land p1 = p2 \to PEq Q1 p1 Q2 p2