lean2/tests/lean/slow/deep.lean

Import Int.
Definition f1 (f : Int -> Int) (x : Int) : Int := f (f (f (f x)))
Definition f2 (f : Int -> Int) (x : Int) : Int := f1 (f1 (f1 (f1 f))) x
Definition f3 (f : Int -> Int) (x : Int) : Int := f1 (f2 (f2 f)) x
Variable f : Int -> Int.
SetOption pp::width 80.
SetOption lean::pp::max_depth 2000.
Eval f3 f 0.
chore(builtin): rename nat, int and real modules to Nat, Int and Real. Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2014-01-01 21:52:25 +00:00			`Import Int.`
Improve pretty printer performance for deep formulas and formats with long lines. Add example that demonstrates performance problem (before: 13 secs, after: 1 sec). Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2013-08-22 05:45:48 +00:00			`Definition f1 (f : Int -> Int) (x : Int) : Int := f (f (f (f x)))`
			`Definition f2 (f : Int -> Int) (x : Int) : Int := f1 (f1 (f1 (f1 f))) x`
feat(kernel/replace_fn): non-recursive replace_fn Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2013-12-18 00:35:39 +00:00			`Definition f3 (f : Int -> Int) (x : Int) : Int := f1 (f2 (f2 f)) x`
Improve pretty printer performance for deep formulas and formats with long lines. Add example that demonstrates performance problem (before: 13 secs, after: 1 sec). Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2013-08-22 05:45:48 +00:00			`Variable f : Int -> Int.`
feat(frontends/lean): rename command Set to SetOption It is not nice to have Set as a reserved keyword. See example examples/lean/set.lean Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2013-12-19 05:18:45 +00:00			`SetOption pp::width 80.`
			`SetOption lean::pp::max_depth 2000.`
Improve pretty printer performance for deep formulas and formats with long lines. Add example that demonstrates performance problem (before: 13 secs, after: 1 sec). Signed-off-by: Leonardo de Moura <leonardo@microsoft.com> 2013-08-22 05:45:48 +00:00			`Eval f3 f 0.`