55 lines
1 KiB
Text
55 lines
1 KiB
Text
|
======
|
||
|
|
Arrows
|
||
|
|
======
|
||
|
|
|
||
|
|
foo (A B : *) (f : A -> A -> B) (x : A) := f x x;
|
||
|
|
|
||
|
|
---
|
||
|
|
|
||
|
|
(program
|
||
|
|
(definition
|
||
|
|
(identifier)
|
||
|
|
(param_block
|
||
|
|
(identifier)
|
||
|
|
(identifier)
|
||
|
|
(expr
|
||
|
|
(app_term
|
||
|
|
(app
|
||
|
|
(term
|
||
|
|
(star))))))
|
||
|
|
(param_block
|
||
|
|
(identifier)
|
||
|
|
(expr
|
||
|
|
(arrow
|
||
|
|
(app_term
|
||
|
|
(app
|
||
|
|
(term
|
||
|
|
(identifier))))
|
||
|
|
(expr
|
||
|
|
(arrow
|
||
|
|
(app_term
|
||
|
|
(app
|
||
|
|
(term
|
||
|
|
(identifier))))
|
||
|
|
(expr
|
||
|
|
(app_term
|
||
|
|
(app
|
||
|
|
(term
|
||
|
|
(identifier))))))))))
|
||
|
|
(param_block
|
||
|
|
(identifier)
|
||
|
|
(expr
|
||
|
|
(app_term
|
||
|
|
(app
|
||
|
|
(term
|
||
|
|
(identifier))))))
|
||
|
|
(expr
|
||
|
|
(app_term
|
||
|
|
(app
|
||
|
|
(term
|
||
|
|
(identifier))
|
||
|
|
(term
|
||
|
|
(identifier))
|
||
|
|
(term
|
||
|
|
(identifier)))))))
|