19 lines
No EOL
246 B
Haskell
19 lines
No EOL
246 B
Haskell
module Objects.Expression
|
|
( Expr
|
|
( Lit,
|
|
Add,
|
|
Sub,
|
|
Mul,
|
|
Div
|
|
),
|
|
-- solve,
|
|
)
|
|
where
|
|
|
|
data Expr
|
|
= Lit Int
|
|
| Add Expr Expr
|
|
| Sub Expr Expr
|
|
| Mul Expr Expr
|
|
| Div Expr Expr
|
|
deriving (Show) |