Files
gf-core/transfer/examples/prelude.tr

5 lines
97 B
Plaintext

const : (A:Type) -> (B:Type) -> A -> B -> A
const _ _ x _ = x
id : (A:Type) -> A -> A
id _ x = x