   "10th parameter"
   [sentence grammar]
   (if (and (inSentence? sentence "01") (inSentence? sentence "Verb"))
-    (do (def i (.indexOf sentence "01"))
-        (def j (.indexOf sentence "Verb"))
-        (if (and (> i 0) (not= (Math/abs (- i j)) 1))
-          (assoc grammar 9 1)
-          grammar))
+    (do (let [i (.indexOf sentence "01")
+              j (.indexOf sentence "Verb")]
+
+          (if (and (> i 0) (not= (Math/abs (- i j)) 1))
+            (assoc grammar 9 1)
+            grammar)))
     grammar))
 
 

  and if they appear sequentially"
  [infoList initGrammar]
  (if (and (not= nil (inSentence? (get infoList 2) "03")) (not= nil (inSentence? (get infoList 2) "P")))
    (do (def first (.indexOf (get infoList 2) "03"))
        ;If 03 followed by P
        (if (and (> first 0) (= (.indexOf (get infoList 2) "P") (+ first 1)))
          (assoc initGrammar 1 1)
          initGrammar))
    initGrammar))



  "Checks if either 'Never Verb 01' or 
  '01 Verb Never' appear in sentence"
  [sentence checkForNV01]

  (let [n (.indexOf sentence "Never")
        v (.indexOf sentence "Verb")  
        o (.indexOf sentence "01")]

        (if (and (not= n -1) (not= v -1) (not= o -1))
          (if checkForNV01
            (< n v o)
            (< o v n))
          false)))


(defn affixHop_aux1
