              (process-token [2/3 5/6] :+) => [3/2]
              (process-token [0 0] :+) => [0]
              )
+       (fact "process-token with :+ and many numbers"
+             (process-token [5 8 9 6 3 2] :+) => [5 8 9 6 5])
        )
 
 (facts "about process-token with :-"

             (process-token [111111 22222222222222222] :*)
               => [2469133333333333308642N]
             )
       )



             (process-token [1/2 0/5] :÷) => [1/2 0]
             (process-token [0.0 0.0] :÷) => [0.0 0.0]
             )
       (fact "process-token with :÷ and many numbers"
             (process-token [5 8 9 6 3 2] :÷) => [5 8 9 6 3/2])
       )

(facts "about process-token with :*"
