comparison Paper/src/bt_impl/bt_env.agda.replaced @ 5:339fb67b4375

INIT rbt.agda
author soto <soto@cr.ie.u-ryukyu.ac.jp>
date Sun, 07 Nov 2021 00:51:16 +0900
parents
children
comparison
equal deleted inserted replaced
4:72667e8198e2 5:339fb67b4375
1 data bt {n : Level} (A : Set n) : Set n where
2 leaf : bt A
3 node : (key : !$\mathbb{N}$!) !$\rightarrow$! (value : A) !$\rightarrow$!
4 (left : bt A ) !$\rightarrow$! (right : bt A ) !$\rightarrow$! bt A
5
6 record Env {n : Level} (A : Set n) : Set n where
7 field
8 varn : !$\mathbb{N}$!
9 varv : A
10 vart : bt A
11 varl : List (bt A)
12 open Env