Destructuring with :key directive

gistfile1.clj

;; Destructor a map with another map -> patient has a shipping address
;; We use the :keys directive to to assign the shipping address info inside of data
;; Notice we also use the :keys directive to also get the name and date of birth
(let [{:keys [name date-of-birth orders]
       {:keys [street city state postal-code]} :shipping-address
       :as patient} data]
  (println name \- date-of-birth)
  (println street ", " city ", " state "  " postal-code)
  (println orders)
  (println "------- Full Patient Deatils -----")
  (println patient))