]> matita.cs.unibo.it Git - helm.git/commitdiff
* parsing errors in tests were not detected and the rest of the file was
authorClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Wed, 15 Jun 2005 17:05:53 +0000 (17:05 +0000)
committerClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Wed, 15 Jun 2005 17:05:53 +0000 (17:05 +0000)
  ignored!!!! Tests fixed
* a few interactive tests moved to tests/interactive to avoid regression
  testing over them (for now...)

helm/matita/tests/apply.ma
helm/matita/tests/comments.ma
helm/matita/tests/fguidi.ma
helm/matita/tests/interactive/test5.ma [new file with mode: 0644]
helm/matita/tests/interactive/test6.ma [new file with mode: 0644]
helm/matita/tests/interactive/test7.ma [new file with mode: 0644]
helm/matita/tests/test4.ma
helm/matita/tests/test5.ma [deleted file]
helm/matita/tests/test6.ma [deleted file]
helm/matita/tests/test7.ma [deleted file]

index d1be8262fbf6c5540d0ea27b03f0aa6f79894de6..757d34769584e28945569dcefb79ea384956cfb1 100644 (file)
@@ -1,4 +1,4 @@
-%% test _with_ the WHD on the apply argument
+(* test _with_ the WHD on the apply argument *)
 
 alias id "not" = "cic:/Coq/Init/Logic/not.con".
 alias id "False" = "cic:/Coq/Init/Logic/False.ind#xpointer(1/1)".
@@ -11,7 +11,7 @@ apply H.
 assumption.
 qed.
 
-%% test _without_ the WHD on the apply argument
+(* test _without_ the WHD on the apply argument *)
 
 alias symbol "eq" (instance 0) = "leibnitz's equality".
 
index baf461d9a6f6ab675d305afdece057327e642a77..0f642d89108e2d6d374bd1386ced1cd5a5d96c78 100644 (file)
@@ -12,8 +12,6 @@
 (*                                                                          *)
 (****************************************************************************)
 
-%% commento segato dal lexer
-
 (* commento che va nell'ast, ma non viene contato
     come step perche' non e' un executable
 *)
@@ -22,18 +20,14 @@ alias num (instance 0) = "natural number".
 alias symbol "eq" (instance 0) = "leibnitz's equality".
 theorem a:0=0.
 
-%% commento segato dal lexer
 (* nota *)
 (**
 
 
-%% questo lo si vuole tenere anche dopo la hint
-hint.
+apply Prop.
 *)
 reflexivity.
 (* commenti che non devono essere colorati perche'
    non c'e' nulla di eseguibile dopo di loro
 *)
 qed.
-
-%% EOF
index 623e327f904b0e3d5411567e133cf23d9a511368..284a700e71f6e02fc0b2e6f313c2a9c65692068c 100644 (file)
@@ -89,6 +89,8 @@ theorem le_gen_S_S_cc: \forall m,n. (le m n) \to (le (S m) (S n)).
 intros. auto.
 qed.
 
+(*
 theorem pippo: \forall m,n. (le (S m) (S n)) \to (le m n).
 intros.
-lapply le_gen_S_x.
\ No newline at end of file
+lapply le_gen_S_x.
+*)
diff --git a/helm/matita/tests/interactive/test5.ma b/helm/matita/tests/interactive/test5.ma
new file mode 100644 (file)
index 0000000..537df88
--- /dev/null
@@ -0,0 +1,5 @@
+whelp instance 
+  \lambda A:Set. 
+  \lambda f: A \to A \to A.
+  \forall x,y : A.
+      f x y = f y x.
diff --git a/helm/matita/tests/interactive/test6.ma b/helm/matita/tests/interactive/test6.ma
new file mode 100644 (file)
index 0000000..0ee5547
--- /dev/null
@@ -0,0 +1,5 @@
+whelp instance 
+  \lambda A:Set.
+  \lambda f:A \to A \to A.
+  \forall x,y,z:A.
+   f x (f y z) = f (f x y) z.
diff --git a/helm/matita/tests/interactive/test7.ma b/helm/matita/tests/interactive/test7.ma
new file mode 100644 (file)
index 0000000..88e971b
--- /dev/null
@@ -0,0 +1,5 @@
+whelp instance 
+  \lambda A:Set.
+  \lambda r:A \to A \to Prop.
+  \forall x:A.
+   r x x.
index 3406652ab20b6628c4cb433f4c79f3ab5d7c7468..83b749ae03483c5871e5dd5123f177cd0093b2f7 100644 (file)
@@ -1,4 +1,3 @@
-%% commento segato dal lexer
 
 (* commento che va nell'ast, ma non viene contato
     come step perche' non e' un executable
@@ -8,18 +7,15 @@ alias num (instance 0) = "natural number".
 alias symbol "eq" (instance 0) = "leibnitz's equality".
 theorem a:0=0.
 
-%% commento segato dal lexer
 (* nota *)
 (**
 
 
-%% questo lo si vuole tenere anche dopo la hint
-hint.
-**)
+apply Prop.
+*)
 apply cic:/Coq/Init/Logic/eq.ind#xpointer(1/1/1). 
 
 (* commenti che non devono essere colorati perche'
    non c'e' nulla di eseguibile dopo di loro
 *)
 qed.
-%% EOF
diff --git a/helm/matita/tests/test5.ma b/helm/matita/tests/test5.ma
deleted file mode 100644 (file)
index 928402a..0000000
+++ /dev/null
@@ -1,5 +0,0 @@
-instance 
-  \lambda A:Set. 
-  \lambda f: A \to A \to A.
-  \forall x,y : A.
-      f x y = f y x.
\ No newline at end of file
diff --git a/helm/matita/tests/test6.ma b/helm/matita/tests/test6.ma
deleted file mode 100644 (file)
index c6a935a..0000000
+++ /dev/null
@@ -1,5 +0,0 @@
-instance 
-  \lambda A:Set.
-  \lambda f:A \to A \to A.
-  \forall x,y,z:A.
-   f x (f y z) = f (f x y) z.
\ No newline at end of file
diff --git a/helm/matita/tests/test7.ma b/helm/matita/tests/test7.ma
deleted file mode 100644 (file)
index 3fc609d..0000000
+++ /dev/null
@@ -1,5 +0,0 @@
-instance 
-  \lambda A:Set.
-  \lambda r:A \to A \to Prop.
-  \forall x:A.
-   r x x.
\ No newline at end of file