TODO.md
# TODO
## PLE2
```haskell
data GuardEquation = ...
guardEquation :: Equation -> GuardEquation
```
## Example
## LH1424 GADTs/Coerce
- [*] Define coerce-consts (c.f. applySorts)
- [*] Encode coerce with coerce-consts
- [*] Encode trivial coerce- without ...