X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fng_cic_content%2Finterpretations.ml;h=0c78e08f999f066ec25e609e6129c20884189ae5;hb=a9afd40d8d1b517a474afe7dcb77197831b1bd75;hp=7e175193ba5493b3da527fd71c32af6490c49f37;hpb=551861bf1adbb1db5b0b9941b98ba54531157364;p=helm.git

diff --git a/matita/components/ng_cic_content/interpretations.ml b/matita/components/ng_cic_content/interpretations.ml
index 7e175193b..0c78e08f9 100644
--- a/matita/components/ng_cic_content/interpretations.ml
+++ b/matita/components/ng_cic_content/interpretations.ml
@@ -63,7 +63,7 @@ let initial_db = {
    pattern32_matrix = [];
    level2_patterns32 = IntMap.empty;
    interpretations = StringMap.empty;
-   compiled32 = lazy (fun _ -> assert false)
+   compiled32 = lazy (Ncic2astMatcher.Matcher32.compiler [])
 }
 
 class type g_status =
@@ -206,7 +206,7 @@ let instantiate_appl_pattern
 
 let destroy_nat =
   let is_nat_URI = NUri.eq (NUri.uri_of_string
-  "cic:/matita/ng/arithmetics/nat/nat.ind") in
+  "cic:/matita/arithmetics/nat/nat.ind") in
   let is_zero = function
     | NCic.Const (NReference.Ref (uri, NReference.Con (0, 1, 0))) when
        is_nat_URI uri -> true