 (defn parse [string]
   (concat
    (en/parse string)
-   (fr/parse string)
-   (it/parse string)))
+;   (es/parse string)
+;   (fr/parse string)
+;   (it/parse string)))
+   ))
 
 (defn expr [id]
   (reader/id2expression (Integer. id)))

            (string/join " "
                         (let [loaded
                               (try
                                 (workbook-sandbox (read-string expr))
                                 ;; TODO: how can I show the stack trace for the
                                 ;; attempt to process the expression?
                                 (catch Exception e

  (:refer-clojure :exclude [get-in merge resolve find parents])
  (:require
   [babel.engine :refer [generate]]
   [babel.enrich :refer [against-pred]]
   [babel.english.grammar :as en]
   [babel.espanol.grammar :as esg]
   [babel.espanol.writer :as es]
;   [babel.francais.grammar :as fr]
;   [babel.italiano.grammar :as it]
   [babel.over :refer [over overh overhc]]
   [babel.html :as html]
   [babel.korma :as korma]
   [babel.parse :as parse]
   [babel.pos :as pos]
   [babel.reader :as reader]
;   [babel.test.fr :as frtest]
   [clojail.core :refer [sandbox]]
   [clojail.testers :refer :all]
   [clojure.core :exclude [get-in]]
