(def myMap {
  :first {
    :name "John",
    :age "17"
  },
  :second {
    :name "Bill",
    :age "27",
    :height "150"
  },
  :third {
    :name "Alicia",
       :height "150"
  }
})

(defn printMap2 [myKey myValue]
(do
(dissoc myMap (for [iKey (keys myMap)]
                 (if (=((myMap iKey) myKey) myValue) iKey))
)
)
)

 (println (printMap2 :height "150"))