module Graphics.Layout.Arithmetic where

import Data.CSS.Tokens (Token(..))

data Opcode n = Add | Subtract | Multiply | Divide | Clamp | Num n
parseCalc :: [Token] -> [Opcode Length]
evalCalc :: [Opcode n] -> n
mapCalc :: (a -> b) -> [Opcode a] -> [Opcode b]