            project-root (nth args 6)
            project-dir (str project-root project-name "/")
            plan-script (str project-dir "plan")]
-       
+
+       ;; Create folders and files
        (fs/mkdirs project-dir)
        (fs/mkdir (str project-dir "domains"))
        (fs/mkdir (str project-dir "solutions"))



(defn all-pddl-preds->hash-map
  "Takes a list of PDDL predicates and
  returns a hash-map of types and the
  assigned predicate"
  [pddl-preds]
  ;; remove :predicates keyword
  (let [pddl-preds (if (= :predicates (first pddl-preds))

            (clojure.string/join " " coll))))

(defn types->hash-map-helper
  "Convert split type list (['<expr>' '<subtype1.1> <subtype1.2> ...' '<type1>']
  to a hash-map {'<type1>': ['<subtype1.1>' '<subtype1.2>' ...], '<type2>': ...}"
  [coll]
  (reduce (fn [h-map [_ objs obj-type]]
