forked from GitHub/gf-core
5 lines
97 B
Plaintext
5 lines
97 B
Plaintext
const : (A:Type) -> (B:Type) -> A -> B -> A
|
|
const _ _ x _ = x
|
|
|
|
id : (A:Type) -> A -> A
|
|
id _ x = x |