X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fcontent_pres%2FcicNotationPres.ml;h=d3465d30a4e21d46b903f70ac0afa67df7c6990f;hb=2b4ed41c3d8a105f1f9921b37e7f11160001bbe7;hp=5f9f202caeaf09b8d7b299444018106abe8a6062;hpb=f6b7c6ae353e014761a3d24dbc87e00d828d7f2d;p=helm.git diff --git a/matita/components/content_pres/cicNotationPres.ml b/matita/components/content_pres/cicNotationPres.ml index 5f9f202ca..d3465d30a 100644 --- a/matita/components/content_pres/cicNotationPres.ml +++ b/matita/components/content_pres/cicNotationPres.ml @@ -200,13 +200,6 @@ let add_parens child_prec curr_prec t = BoxPp.render_to_string (function x::_->x|_->assert false) ~map_unicode_to_tex:false 80 t);*)t) -let lookup_uri ids_to_uris id = - try - let uri = Hashtbl.find ids_to_uris id in - Some (NReference.string_of_reference uri) - with Not_found -> None -;; - let render ~lookup_uri ?(prec=(-1)) = let module A = Ast in let module P = Mpresentation in