X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2Ftests%2Ftest4.ma;h=be67f3a8eacd5793e4c124b21935125b3a3600fa;hb=e7916b85dd9dab26b628ace838c683beb31db9c1;hp=4d7b03ce29cedd686540b379877b8b10ab74f2bb;hpb=7c08187b8e1af81817927151aa07d52b72c7aa4d;p=helm.git

diff --git a/helm/matita/tests/test4.ma b/helm/matita/tests/test4.ma
index 4d7b03ce2..be67f3a8e 100644
--- a/helm/matita/tests/test4.ma
+++ b/helm/matita/tests/test4.ma
@@ -1,4 +1,23 @@
+set "baseuri" "cic:/matita/tests/test4/".
+
+
+(* commento che va nell'ast, ma non viene contato
+    come step perche' non e' un executable
+*)
+
 alias num (instance 0) = "natural number".
 alias symbol "eq" (instance 0) = "leibnitz's equality".
 theorem a:0=0.
-reflexivity.
\ No newline at end of file
+
+(* nota *)
+(**
+
+
+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.