X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Ftactics%2Funiverse.ml;h=f7c3932dc688abf1e5ca3c4acb0308d59b1d4a66;hb=8568952f9d2f97524d1a150743fc91ca9d0c0d05;hp=c4e439efe34ca8ffa579b4e94a95e7ebd0066a70;hpb=d030f02fa8a708cd663ffd0c5783770906b9b21a;p=helm.git diff --git a/helm/software/components/tactics/universe.ml b/helm/software/components/tactics/universe.ml index c4e439efe..f7c3932dc 100644 --- a/helm/software/components/tactics/universe.ml +++ b/helm/software/components/tactics/universe.ml @@ -162,7 +162,7 @@ let remove univ context term ty = let remove_uri univ uri = let term = CicUtil.term_of_uri uri in - let ty,_ = CicTypeChecker.type_of_aux' [] [] term CicUniv.empty_ugraph in + let ty,_ = CicTypeChecker.type_of_aux' [] [] term CicUniv.oblivion_ugraph in remove univ [] term ty