rhi/quox
rhi
/
quox
1
0
Fork 0
Code Issues 16 Pull Requests 1 Releases Wiki Activity

fix Main.idr

This commit is contained in:
rhiannon morris 2023-02-26 10:58:22 +01:00
parent 79a828449a
commit c25b910edf
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
exe/Main.idr
View File

@ -56,7 +56,7 @@ banner opts = unlines $ zipWith (join1 opts) (qtuwu opts) (text opts)
export
tm : Term Three 1 2
tm =
(Pi One "a" (BVT 0) (TUsed $ E (F "F" :@@ [BVT 0, FT "w"]))
(Pi_ One "a" (BVT 0) (E (F "F" :@@ [BVT 0, FT "w"]))
`DCloT` (K One ::: id))
`CloT` (F "y" ::: TYPE (U 1) :# TYPE (U 2) ::: id)