geochan/src/js/js_babillard.ml