124b4d37fe
This commit also fixes a bug in the old `simp_inductive` module, and removes now obsolete files (`compiler_step_visitor` and `old_util`).
7 lines
115 B
Text
7 lines
115 B
Text
structure S :=
|
|
(a : nat) (h : a > 0) (b : nat)
|
|
|
|
def f (s : S) :=
|
|
s.b - s.a
|
|
|
|
#eval f {a := 5, b := 30, h := sorry }
|