 
 type QueryRoot {
   user: User
+  loremIpsum(words: Int! = 1): String!
 }
 
 type CreateUser {

            [graphql-clj.type :as type]
            [graphql-clj.parser :as parser]
            [graphql-clj.introspection :as introspection]
            [clojure.core.match :as match]))

(def simple-user-schema-str
  "type User {

      ["QueryRoot"  "user"] (fn [& args]
                              {:name "Test user name"
                               :nickname "Test user nickname"})
      ["QueryRoot"  "loremIpsum"] (fn [context parent & args]
                                    (let [words (-> args first (get "words"))]
                                      (str/join " " (repeat words "Lorem"))))
      ["User" "son"] (fn [context parent & args]
                       {:name "Test son name"
                        :nickname "Son's nickname"})
