         (assoc :form :time-of-day)))
 
   "<time-of-day> am|pm"
-  [{:form :time-of-day} #"(?i)([ap])(\s|\.)?m?\.?"];Check me DO WE NEED THIS
+  [{:form :time-of-day} #"(?i)([ap])\.?m\.?(?:\p{P}|\p{Z}|$)"];Check me DO WE NEED THIS
   ;; TODO set_am fn in helpers => add :ampm field
   (let [[p meridiem] (if (= "a" (-> %2 :groups first clojure.string/lower-case))
                        [[(hour 0) (hour 12) false] :am]

      (assoc :latent true))

  "hhmm (military) am|pm" ; hh only from 00 to 12
  [#"(?i)((?:1[012]|0?\d))([0-5]\d)" #"(?i)([ap])\.?m?\.?"]
  ; (-> (hour-minute (Integer/parseInt (first (:groups %1)))
  ;                  (Integer/parseInt (second (:groups %1)))
  ;                  false) ; not a 12-hour clock)

  [#"(?i)an einem" {:form :day-of-week}]
  %2 ; does NOT dissoc latent

  ;;;;;;;;;;;;;;;;;;;
  ;; Named things

