Убрал предупреждения GHC
Переписал калькулятор. Теперь токены забираются линейно