54 lines
1 KiB
Text
54 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)))))))
|