]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/contribs/prova.ma
Huge commit:
[helm.git] / matita / contribs / prova.ma
index 407db9b6658f907ba5b0d8718e6524773858421f..67c4b1ebf8a9d41b96f28fe63d932dd8d401955d 100644 (file)
 (*                                                                        *)
 (**************************************************************************)
 
-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.
-               try rewrite > P in Q.  
-(*             
-theorem pippo2: \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.
-*)
+inline procedural
+   "cic:/matita/LAMBDA-TYPES/Level-1/LambdaDelta/pr0/props/pr0_subst0.con".