Mercurial > hg > Members > atton > delta_monad
comparison agda/basic.agda @ 90:55d11ce7e223
Unify levels on data type. only use suc to proofs
author | Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 19 Jan 2015 12:11:38 +0900 |
parents | 743c05b98dad |
children |
comparison
equal
deleted
inserted
replaced
89:5411ce26d525 | 90:55d11ce7e223 |
---|---|
3 module basic where | 3 module basic where |
4 | 4 |
5 id : {l : Level} {A : Set l} -> A -> A | 5 id : {l : Level} {A : Set l} -> A -> A |
6 id x = x | 6 id x = x |
7 | 7 |
8 _∙_ : {l ll lll : Level} {A : Set l} {B : Set ll} {C : Set lll} -> (B -> C) -> (A -> B) -> (A -> C) | 8 _∙_ : {l : Level} {A B C : Set l} -> (B -> C) -> (A -> B) -> (A -> C) |
9 f ∙ g = \x -> f (g x) | 9 f ∙ g = \x -> f (g x) |
10 | 10 |
11 postulate String : Set | 11 postulate String : Set |
12 postulate show : {l : Level} {A : Set l} -> A -> String | 12 postulate show : {l : Level} {A : Set l} -> A -> String |