rename <&&>/<||> to andM/orM
This commit is contained in:
parent
841564f69f
commit
95a6644a6c
2 changed files with 6 additions and 6 deletions
|
@ -92,7 +92,7 @@ parameters (defs : Definitions' q g)
|
|||
TYPE _ => pure False
|
||||
Pi {res, _} => isSubSing res.term
|
||||
Lam {} => pure False
|
||||
Sig {fst, snd} => isSubSing fst <&&> isSubSing snd.term
|
||||
Sig {fst, snd} => isSubSing fst `andM` isSubSing snd.term
|
||||
Pair {} => pure False
|
||||
Enum tags => pure $ length (SortedSet.toList tags) <= 1
|
||||
Tag {} => pure False
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue