Skip to content

Commit 9ddc11f

Browse files
committed
Maps: remove unnecessary implicit pattern matching
1 parent 0dec856 commit 9ddc11f

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

src/Maps.lidr

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -360,13 +360,13 @@ partial maps.
360360
> Refl
361361
>
362362
> update_same : m x = Just v -> update x v m = m
363-
> update_same {x} {m} {v} prf =
363+
> update_same {x} {m} prf =
364364
> rewrite sym prf in
365365
> rewrite t_update_same {x} {m} in
366366
> Refl
367367
>
368368
> update_permute : Not (x2 = x1) -> update x1 v1 $ update x2 v2 m
369369
> = update x2 v2 $ update x1 v1 m
370-
> update_permute {x1} {x2} {v1} {v2} {m} neq =
371-
> rewrite t_update_permute neq {x1} {x2} {v1=Just v1} {v2=Just v2} {m} in
372-
> Refl
370+
> update_permute {v1} {v2} {m} neq =
371+
> rewrite t_update_permute neq {v1=Just v1} {v2=Just v2} {m} in
372+
> Refl

0 commit comments

Comments
 (0)