 	#^JButton button          (make-button buttons "Force"),
 
 	get-force-parameters      (fn []
-				    (with-swing-error-msg frame "Invalid Parameter given."
-				     (let [r (Double/parseDouble (.getText rep-field)),
-					   a (Double/parseDouble (.getText attr-field)),
-					   g (Double/parseDouble (.getText grav-field)),
-					   i (Integer/parseInt (.getText iter-field))]
-				       [r a g i])))]
+				    (let [r (Double/parseDouble (.getText rep-field)),
+					  a (Double/parseDouble (.getText attr-field)),
+					  g (Double/parseDouble (.getText grav-field)),
+					  i (Integer/parseInt (.getText iter-field))]
+				      [r a g i]))]
     (add-action-listener button (fn [evt]
 				  (with-swing-error-msg frame "An Error occured."
 				   (let [[r a g i] (get-force-parameters)]
 				     (improve-with-force scn i r a g)))))))
+
 
 ;; zoom-move
 

					  (do-nodes [n scn]
					   (set-node-radius! n new-radius))
					  (redraw-scene scn))))))
  ;; labels
  ;; layout
  ;; move mode (ideal, filter, chain, single)
  nil)

;; improve with force layout


    main-panel))


;;; Drawing Routine for the REPL

(defn draw-lattice
  "Draws given lattice with given layout-function on a canvas and returns
