Перенос части Lisp код для Clojure (PAIP)

Я читаю Парадигмы программирования искусственного интеллекта (PAIP) Питера Норвига, и я пытаюсь написать весь код на Clojure а не обычный Лисп. Однако я застрял на этом фрагменте кода на странице 39:

(defparameter *simple-grammar*
  '((sentence -> (noun-phrase verb-phrase))
   (noun-phrase -> (Article Noun))
   (verb-phrase -> (Verb noun-phrase))
   (Article -> the a)
   (Noun -> man ball woman table)
   (Verb -> hit took saw liked))
  "A grammar for a trivial subset of English.")

 (defvar *grammar* *simple-grammar*)

Как я могу перевести это на Clojure? m пытается писать весь код на Clojure, а не на обычном Lisp. Однако я застрял на этом фрагменте кода на странице 39:

(defparameter *simple-grammar*
  '((sentence -> (noun-phrase verb-phrase))
   (noun-phrase -> (Article Noun))
   (verb-phrase -> (Verb noun-phrase))
   (Article -> the a)
   (Noun -> man ball woman table)
   (Verb -> hit took saw liked))
  "A grammar for a trivial subset of English.")

 (defvar *grammar* *simple-grammar*)

Как я могу перевести это на Clojure? m пытается писать весь код на Clojure, а не на обычном Lisp. Однако я застрял на этом фрагменте кода на странице 39:

(defparameter *simple-grammar*
  '((sentence -> (noun-phrase verb-phrase))
   (noun-phrase -> (Article Noun))
   (verb-phrase -> (Verb noun-phrase))
   (Article -> the a)
   (Noun -> man ball woman table)
   (Verb -> hit took saw liked))
  "A grammar for a trivial subset of English.")

 (defvar *grammar* *simple-grammar*)

Как я могу перевести это на Clojure? Спасибо.