-let create ~dictionary ~mml ~tml ~log =
- I_mathml_editor.create dictionary#as_Document mml#as_Document tml#as_Document log
+let default_dictionary_path = I_mathml_editor.get_default_dictionary_path ()
+;;
+
+let default_mathml_stylesheet_path = I_mathml_editor.get_default_mathml_stylesheet_path ()
+;;
+
+let default_tex_stylesheet_path = I_mathml_editor.get_default_tex_stylesheet_path ()
+;;
+
+let create ?(alt_lexer=false) ~dictionary_uri ~mml_uri ~tml_uri ~log =
+ I_mathml_editor.create ~alt_lexer ~dictionary_uri ~mml_uri ~tml_uri ~log