Show Quox.Equal.Mode

2022-04-27 14:56:39 +02:00 · 2022-04-27 14:56:39 +02:00 · bcd4544692
parent 7629404097
commit bcd4544692
1 changed files with 2 additions and 0 deletions
--- a/src/Quox/Equal.idr
+++ b/src/Quox/Equal.idr
@ -10,6 +10,8 @@ import Quox.Error
 public export
 data Mode = Equal | Sub

+export %inline Show Mode where show Equal = "Equal"; show Sub = "Sub"
+
 public export
 data Error
 = ClashT Mode (Term d n) (Term d n)