X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Flibrary%2Fnat%2Ffactorial.ma;h=9c1a4e97d7183042e9ebe5b6ff4a7c0d862f40ba;hb=68dbcd02022874a025a9444aa1125b0458816fbb;hp=58220cb0cbcdbeedd773fb9d51cd9292da849882;hpb=c445ba5534cccde19016c92660ab52777af221c0;p=helm.git

diff --git a/helm/software/matita/library/nat/factorial.ma b/helm/software/matita/library/nat/factorial.ma
index 58220cb0c..9c1a4e97d 100644
--- a/helm/software/matita/library/nat/factorial.ma
+++ b/helm/software/matita/library/nat/factorial.ma
@@ -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.