dunham/newt
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

Don't allow uppercase pattern variables

Browse Source
This commit is contained in:
Steve Dunham
2026-02-20 16:12:54 -08:00
parent 7d5789147d
commit c54b856f0b
5 changed files with 24 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
tests/Tree.newt
View File

@@ -66,7 +66,7 @@ data Sg : (A : U) -> (A -> U) -> U where
_,_ : {A : U} {B : A -> U} -> (a : A) -> B a -> Sg A B
_*_ : U -> U -> U
A * B = Sg A (\ _ => B)
a * b = Sg a (\ _ => b)
TooBig : Bnd -> Bnd -> Nat -> U
TooBig l u h = Sg Nat (\ x => T23 l (N x) h * T23 (N x) u h)