From 92bff24fcd4038decc04e042564fa2f329d5ccb3 Mon Sep 17 00:00:00 2001 From: Enrico Tassi Date: Mon, 16 May 2005 15:23:34 +0000 Subject: [PATCH] added examples --- helm/matita/tests/comments.ma | 21 +++++++++++++++++++++ helm/matita/tests/rewrite.ma | 9 +++++++++ 2 files changed, 30 insertions(+) create mode 100644 helm/matita/tests/comments.ma create mode 100644 helm/matita/tests/rewrite.ma diff --git a/helm/matita/tests/comments.ma b/helm/matita/tests/comments.ma new file mode 100644 index 000000000..6e5f59010 --- /dev/null +++ b/helm/matita/tests/comments.ma @@ -0,0 +1,21 @@ +%% commento segato dal lexer + +(* 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. + +%% commento segato dal lexer +(* nota *) + +%% questo lo si vuole tenere anche dopo la hint +hint. + +(* commenti che non devono essere colorati perche' + non c'e' nulla di eseguibile dopo di loro +*) + +%% EOF diff --git a/helm/matita/tests/rewrite.ma b/helm/matita/tests/rewrite.ma new file mode 100644 index 000000000..5bae95b10 --- /dev/null +++ b/helm/matita/tests/rewrite.ma @@ -0,0 +1,9 @@ +alias id "nat" = "cic:/Coq/Init/Datatypes/nat.ind#xpointer(1/1)". +alias num (instance 0) = "natural number". +alias symbol "eq" (instance 0) = "leibnitz's equality". +alias symbol "plus" (instance 0) = "natural plus". +theorem a: + \forall a,b:nat. + a = b \to b + 0 = a. +intro. +rewrite left H. \ No newline at end of file -- 2.39.2