diff options
| author | Chloe Brown <chloe.brown.00@outlook.com> | 2024-01-22 12:11:20 +0000 |
|---|---|---|
| committer | Chloe Brown <chloe.brown.00@outlook.com> | 2024-01-22 12:11:20 +0000 |
| commit | f0f44fe7815435836bc625e837e891188ae8d801 (patch) | |
| tree | a695ae6fee918ffa653502ad000e75997d221d75 /src/Term/Semantics.idr | |
| parent | 5d5807f215805f1e235a0ad0546f995dd19a6767 (diff) | |
Fix some bug?
I don't really know. I haven't read this in a long time.
Diffstat (limited to 'src/Term/Semantics.idr')
| -rw-r--r-- | src/Term/Semantics.idr | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/src/Term/Semantics.idr b/src/Term/Semantics.idr index c31a9e6..eb1c9c5 100644 --- a/src/Term/Semantics.idr +++ b/src/Term/Semantics.idr @@ -70,7 +70,6 @@ opSem (Inl ty1 ty2) = inl ty1 ty2 opSem (Inr ty1 ty2) = swap ty2 ty1 . inl ty2 ty1 opSem (Prl ty1 ty2) = prl ty1 ty2 opSem (Prr ty1 ty2) = prl ty2 ty1 . swap ty1 ty2 -opSem (Arb ty) = arb ty %inline sem' : Monad m => Term ty ctx -> m (All TypeOf ctx -> TypeOf ty) |