view prepaper/src/env.agda @ 0:3dba680da508

init-test
author soto
date Tue, 08 Dec 2020 19:06:49 +0900
parents
children
line wrap: on
line source

record Envc : Set where
  field
    vari : ℕ
    varn : ℕ
    c10  : ℕ

makeEnv : ℕ → ℕ → ℕ → Envc
makeEnv i n c = record { vari = i ; varn = n ; c10 = c }