lean4-htt/tests/lean/run/equation_with_values.lean

51 lines
903 B
Text
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

def f : char → nat
| #"a" := 0
| #"b" := 1
| #"c" := 2
| #"d" := 3
| #"e" := 4
| _ := 5
check f.equations.eqn_1
check f.equations.eqn_2
check f.equations.eqn_3
check f.equations.eqn_4
check f.equations.eqn_5
check f.equations.eqn_6
def g : nat → nat
| 100000 := 0
| 200000 := 1
| 300000 := 2
| 400000 := 3
| _ := 5
check g.equations.eqn_1
check g.equations.eqn_2
check g.equations.eqn_3
check g.equations.eqn_4
check g.equations.eqn_5
def h : string → nat
| "hello" := 0
| "world" := 1
| "bla" := 2
| "boo" := 3
| _ := 5
check h.equations.eqn_1
check h.equations.eqn_2
check h.equations.eqn_3
check h.equations.eqn_4
check h.equations.eqn_5
def r : string × string → nat
| ("hello", "world") := 0
| ("world", "hello") := 1
| _ := 2
check r.equations.eqn_1
check r.equations.eqn_2
check r.equations.eqn_3
check r.equations.eqn_4
check r.equations.eqn_5