]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/library/nat/factorial.ma
- transcript: bugfix
[helm.git] / helm / software / matita / library / nat / factorial.ma
index 58220cb0cbcdbeedd773fb9d51cd9292da849882..9c1a4e97d7183042e9ebe5b6ff4a7c0d862f40ba 100644 (file)
@@ -19,7 +19,7 @@ let rec fact n \def
   [ O \Rightarrow (S O)
   | (S m) \Rightarrow (S m)*(fact m)].
 
-interpretation "factorial" 'fact n = (cic:/matita/nat/factorial/fact.con n).
+interpretation "factorial" 'fact n = (fact n).
 
 theorem le_SO_fact : \forall n. (S O) \le n!.
 intro.elim n.simplify.apply le_n.