Files
gf-core/transfer/examples/prelude.tr
2005-11-25 16:36:19 +00:00

5 lines
105 B
Plaintext

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