Show Quox.Equal.Mode
This commit is contained in:
parent
7629404097
commit
bcd4544692
1 changed files with 2 additions and 0 deletions
|
@ -10,6 +10,8 @@ import Quox.Error
|
||||||
public export
|
public export
|
||||||
data Mode = Equal | Sub
|
data Mode = Equal | Sub
|
||||||
|
|
||||||
|
export %inline Show Mode where show Equal = "Equal"; show Sub = "Sub"
|
||||||
|
|
||||||
public export
|
public export
|
||||||
data Error
|
data Error
|
||||||
= ClashT Mode (Term d n) (Term d n)
|
= ClashT Mode (Term d n) (Term d n)
|
||||||
|
|
Loading…
Reference in a new issue