          [1 -1] [0 0]
          [-1 -1] [0 0]
          }
-        {} {}))))
+
+        {[0 1] 10, [0 -1] 10, [1 0] 10, [-1 0] 10, [1 1] 14, [-1 1] 14, [1 -1] 14, [-1 -1] 14}
+        {[0 1] 190, [0 -1] 210, [1 0] 190, [-1 0] 210, [1 1] 180, [-1 1] 200, [1 -1] 200, [-1 -1] 220}
+        ))))
 
 (deftest calculate-open-fscore-test
   (let [{:keys [g-score f-score]}

       (pf/reduce-state-over-neighbours
        (pf/->state #{} #{[0 0]} {} {} {})
        [0 0]
        [[0 1] [0 -1] [1 0] [-1 0] [1 1] [-1 1] [1 -1] [-1 -1]])
       (pf/->state
        #{}
        #{[0 0] [0 1] [0 -1] [1 0] [-1 0] [1 1] [-1 1] [1 -1] [-1 -1]}

       (pf/state-add-neighbour
        (pf/->state #{} #{} {} {} {})
        [0 0]
        [1 1]
        [10 10])
       (pf/->state #{} #{[1 1]} {[1 1] [0 0]}
                   {[1 1] 14}
                   {[1 1] 180}
                   ))))

(deftest state-add-open-test
  (is (=
