 
 
 (defn mknode
+  "It takes a list or an undefined number of geometries and put them into
+   a single node. Materials are preserverd."
   [& objs]
-  (let [new-node (Node. "node")]
-    (doseq [geom objs] (.attachChild new-node geom))
+  (let [flattened-args (flatten objs)
+	new-node (Node. "node")]
+    (doseq [geom flattened-args] (.attachChild new-node geom))
     new-node))
 
 

  [filename]
  (let [imported-model ^Geometry (.loadModel asset-manager filename)]
    (doto imported-model
      (.setMaterial (default-material)))))
      (.setMaterial (default-material)))))


(defn load-obj
  "Load an .obj file and makes it available for rendering.
   Remember to load a single model with this function. For
