rhi/quox
rhi/quox
1
0
Fork 0
Code Issues 15 Pull requests 1 Releases Wiki Activity

erasure to untyped syntax

Browse source
This commit is contained in:
rhiannon morris 2023-09-30 18:37:44 +02:00
parent 0b7bd0ef46
commit 428397f42b
3 changed files with 453 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lib/Quox/Typing/Context.idr
View file

@ -73,7 +73,7 @@ namespace TContext
zeroFor : Context tm n -> QOutput n
zeroFor ctx = Zero <$ ctx
private
public export
extendLen : Telescope a n1 n2 -> Singleton n1 -> Singleton n2
extendLen [<] x = x
extendLen (tel :< _) x = [|S $ extendLen tel x|]