added boxml namespace

diff --git a/helm/ocaml/cic_transformations/misc.ml b/helm/ocaml/cic_transformations/misc.ml
index ec983d10641b180742ada6c90a9842ba98c80db0..56d54255623822103d0909f4f25c709310b442ce 100644 (file)
--- a/helm/ocaml/cic_transformations/misc.ml
+++ b/helm/ocaml/cic_transformations/misc.ml
@@ -37,6 +37,7 @@ let domImpl = Gdome.domImplementation ()
 let helm_ns = Gdome.domString "http://www.cs.unibo.it/helm"
 let xlink_ns = Gdome.domString "http://www.w3.org/1999/xlink"
 let mathml_ns = Gdome.domString "http://www.w3.org/1998/Math/MathML"
+let boxml_ns = Gdome.domString "http://helm.cs.unibo.it/2003/BoxML"
 
   (* TODO BRRRRR .... *)
   (** strip first 4 line of a string, used to strip xml declaration and doctype

diff --git a/helm/ocaml/cic_transformations/misc.mli b/helm/ocaml/cic_transformations/misc.mli
index d2bf22835557ea89c15fd7c240db3640a76f1e6e..d0779d1e7f26a2ee8fc47376e16651dc38bb40a3 100644 (file)
--- a/helm/ocaml/cic_transformations/misc.mli
+++ b/helm/ocaml/cic_transformations/misc.mli
@@ -36,9 +36,11 @@
 (* TODO rename this module into at least something like CicMisc *)
 
 val domImpl : Gdome.domImplementation
-val helm_ns : Gdome.domString   (** HELM namespace *)
-val xlink_ns : Gdome.domString  (** XLink namespace *)
-val mathml_ns: Gdome.domString  (** MathML namespace *)
+
+val helm_ns   : Gdome.domString   (** HELM namespace *)
+val xlink_ns  : Gdome.domString   (** XLink namespace *)
+val mathml_ns : Gdome.domString   (** MathML namespace *)
+val boxml_ns  : Gdome.domString   (** BoxML namespace *)
 
 val strip_xml_headings: string -> string