Mars-rover kata usage from the REPL

repl-session.clj

(require 
  '[marsrover.grid :as grid] 
  '[marsrover.robot :as robot] 
  '[marsrover.core :refer :all])

;; 10x10 grid with obstacle at 1,1. Robot moves beside it.
(let [grid (grid/make-grid [10 10] [[1 1]]) 
      robot (robot/make-robot [0 0] \n grid)] 
  (tell-robot robot "fffrf"))
;;{:robot {:pos [1 3], :dir \e, :grid {:dim [10 10], :obstacles {[1 1] true}}}, :status :ok}

;; 10x10 grid with obstacle at 1,1. Robot impacts ith it.
(let [grid (grid/make-grid [10 10] [[1 1]]) 
      robot (robot/make-robot [0 0] \n grid)] 
  (tell-robot robot "rflfff"))
;;{:robot {:pos [1 0], :dir \n, :grid {:dim [10 10], :obstacles {[1 1] true}}}, :status :obstacle-found, :where [1 1]}