tiny tweak
This commit is contained in:
parent
818d559d58
commit
2b756ae1bb
1 changed files with 2 additions and 2 deletions
|
@ -90,8 +90,8 @@ mutual
|
||||||
%name DScopeTerm body
|
%name DScopeTerm body
|
||||||
|
|
||||||
public export %inline
|
public export %inline
|
||||||
Arr : Qty -> Term d n -> Term d n -> Term d n
|
Arr : (qty : Qty) -> (arg, res : Term d n) -> Term d n
|
||||||
Arr pi a b = Pi {qty = pi, x = "_", arg = a, res = TUnused b}
|
Arr {qty, arg, res} = Pi {qty, x = "_", arg, res = TUnused res}
|
||||||
|
|
||||||
||| same as `F` but as a term
|
||| same as `F` but as a term
|
||||||
public export %inline
|
public export %inline
|
||||||
|
|
Loading…
Reference in a new issue