    }
   (let [found (find returnedMap keywordField);ie. non nil, it's a [key value] vector
         ;_ (assumedTrue found)
-        _ (assumedTrue [found 
+        _ (assumedNotNil [found 
                         "you tried to access field `" keywordField 
                         "` that didn't exist in map `" returnedMap
                         "`, you should've checked before!"])

              key "` whatever you passed evaluated to this before the call")
            )
          ]
      (getKeyIfExists whichMap key)
      )
    )
  ([ret_object key]

    )
  )

(defn getExistingKey
  [key]
  (let [[k v] (getExistingKeyVec key)
        ]
    (cond (keyword? k)
      k
      :else
      v
      )
    )
  )

(deftest test_get1
  (is (= [:a 1] (getExistingKeyVec {:a 1} :a )))
  (is (= [:a nil] (getExistingKeyVec {:a nil} :a )))
  (is (= [:a 1] (getVectorKeyIfExists {:a 1} :a )))
  (is (= [:a nil] (getVectorKeyIfExists {:a nil} :a )))
  (is (nil? (getVectorKeyIfExists {:a nil} :b )))
  (isthrown? exceptionThrownWhenKeyDoesNotExist 
    (getExistingKeyVec {:a nil} :b ))
  )


