From: Claudio Sacerdoti Coen Date: Tue, 8 Nov 2005 09:26:47 +0000 (+0000) Subject: New syntax for the outtype of a match. X-Git-Tag: V_0_7_2_3~108 X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=b77483d334787d16f47b6badaeef01e6dee1258f;p=helm.git New syntax for the outtype of a match. --- diff --git a/helm/matita/tests/first.ma b/helm/matita/tests/first.ma index 6120d93c4..4fca7b199 100644 --- a/helm/matita/tests/first.ma +++ b/helm/matita/tests/first.ma @@ -26,8 +26,7 @@ inductive list (A:Set) : Set \def | cons : A \to list A \to list A. let rec list_len (A:Set) (l:list A) on l \def - [\lambda x.nat] - match (l:list A) with + match l with [ nil \Rightarrow O | (cons a tl) \Rightarrow S (list_len A tl)].