add (?!) for nondependent contexts

This commit is contained in:
rhiannon morris 2021-12-23 15:56:01 +01:00
parent 2a5b8ec815
commit 7bc58625a1
2 changed files with 9 additions and 0 deletions

View file

@ -204,3 +204,7 @@ interface CanShift f where
(//) : f from -> Shift from to -> f to
export CanShift Var where i // by = shift by i
namespace CanShift
export
[Const] CanShift (\_ => a) where x // _ = x