Rename variable
This commit is contained in:
parent
08ed943d56
commit
601ef93a70
|
@ -11,7 +11,7 @@ data Term =
|
||||||
| Add
|
| Add
|
||||||
|
|
||||||
pretty x = case x of
|
pretty x = case x of
|
||||||
(Abs name term) -> "L" ++ name ++ "." ++ pretty term
|
(Abs param term) -> "L" ++ param ++ "." ++ pretty term
|
||||||
(Inv func param) -> "(" ++ pretty func ++ " " ++ pretty param ++ ")"
|
(Inv func param) -> "(" ++ pretty func ++ " " ++ pretty param ++ ")"
|
||||||
(Var name) -> name
|
(Var name) -> name
|
||||||
Add -> "Add"
|
Add -> "Add"
|
||||||
|
|
Loading…
Reference in a new issue