remove some noLoc
s
This commit is contained in:
parent
1da902d13a
commit
ca1adcce47
11 changed files with 36 additions and 36 deletions
|
@ -197,7 +197,7 @@ namespace EqContext
|
|||
toTyContext : (e : EqContext n) -> TyContext e.dimLen n
|
||||
toTyContext (MkEqContext {dimLen, dassign, dnames, tctx, tnames, qtys}) =
|
||||
MkTyContext {
|
||||
dctx = fromGround dassign,
|
||||
dctx = fromGround dnames dassign,
|
||||
tctx = map (// shift0 dimLen) tctx,
|
||||
dnames, tnames, qtys
|
||||
}
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue