gistfile1.clj

user=> (def cell [3 88])
#'user/cell
user=> (defn shifter [[x-shift y-shift]] [ (+ (first cell) x-shift)
                                           (+ (second cell) y-shift)])
#'user/shifter
user=> (shifter [-1 1])
[2 89]
user=> (map shifter meaningful-values)
([2 87] [2 88] [2 89] [3 87] [3 89] [4 87] [4 88] [4 89])