11 lines
231 B
Agda
11 lines
231 B
Agda
|
module Language where
|
|||
|
|
|||
|
open import Data.String using (String)
|
|||
|
open import Data.Nat using (ℕ)
|
|||
|
|
|||
|
data Expr : Set where
|
|||
|
_+_ : Expr → Expr → Expr
|
|||
|
_-_ : Expr → Expr → Expr
|
|||
|
`_ : String → Expr
|
|||
|
#_ : ℕ → Expr
|