Equations
- Assignment02.snoc [] x✝ = [x✝]
- Assignment02.snoc (m :: ms) x✝ = m :: Assignment02.snoc ms x✝
Instances For
Equations
- Assignment02.sum = List.foldr (fun (n acc : Nat) => n + acc) 0
Instances For
theorem
Assignment02.foldr_append
{α : Type u_1}
{β : Type u_2}
(f : α → β → β)
(e : β)
(xs ys : List α)
:
Equations
- Assignment02.eval env (Assignment02.AExp.num i) = i
- Assignment02.eval env (Assignment02.AExp.var x_1) = env x_1
- Assignment02.eval env (e₁.add e₂) = Assignment02.eval env e₁ + Assignment02.eval env e₂
- Assignment02.eval env (e₁.sub e₂) = Assignment02.eval env e₁ - Assignment02.eval env e₂
- Assignment02.eval env (e₁.mul e₂) = Assignment02.eval env e₁ * Assignment02.eval env e₂
- Assignment02.eval env (e₁.div e₂) = Assignment02.eval env e₁ / Assignment02.eval env e₂
Instances For
Equations
- Assignment02.someEnv "x" = 3
- Assignment02.someEnv "y" = 17
- Assignment02.someEnv x✝ = 201
Instances For
Equations
- Assignment02.simplify ((Assignment02.AExp.num 0).add e₂) = Assignment02.simplify e₂
- Assignment02.simplify (e₁.add (Assignment02.AExp.num 0)) = Assignment02.simplify e₁
- Assignment02.simplify ((Assignment02.AExp.num 1).mul e₂) = Assignment02.simplify e₂
- Assignment02.simplify (e₁.mul (Assignment02.AExp.num 1)) = Assignment02.simplify e₁
- Assignment02.simplify (a.mul (Assignment02.AExp.num 0)) = Assignment02.AExp.num 0
- Assignment02.simplify ((Assignment02.AExp.num 0).mul a) = Assignment02.AExp.num 0
- Assignment02.simplify (e₁.div (Assignment02.AExp.num 1)) = Assignment02.simplify e₁
- Assignment02.simplify ((Assignment02.AExp.num 0).div a) = Assignment02.AExp.num 0
- Assignment02.simplify (e₁.sub (Assignment02.AExp.num 0)) = Assignment02.simplify e₁
- Assignment02.simplify ((Assignment02.AExp.num 0).sub e₂) = (Assignment02.AExp.num (-1)).mul (Assignment02.simplify e₂)
- Assignment02.simplify (Assignment02.AExp.num i) = Assignment02.AExp.num i
- Assignment02.simplify (Assignment02.AExp.var x_1) = Assignment02.AExp.var x_1
- Assignment02.simplify (e₁.add e₂) = (Assignment02.simplify e₁).add (Assignment02.simplify e₂)
- Assignment02.simplify (e₁.sub e₂) = (Assignment02.simplify e₁).sub (Assignment02.simplify e₂)
- Assignment02.simplify (e₁.mul e₂) = (Assignment02.simplify e₁).mul (Assignment02.simplify e₂)
- Assignment02.simplify (e₁.div e₂) = (Assignment02.simplify e₁).div (Assignment02.simplify e₂)