(* *)
(**************************************************************************)
-set "baseuri" "cic:/matita/test/".
+set "baseuri" "cic:/matita/tests".
include "nat/nat.ma".
theorem pippo: \forall (P,Q,R:nat \to Prop).
\forall x,y. x=y \to P x \to Q x \to R x.
intros. rewrite > H in y.
-*)
\ No newline at end of file
+*)