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

remove Tighten stuff #47

Merged
rhi merged 6 commits from notight into 🐉 2024-07-18 11:59:08 -04:00
Conversation 0 Commits 6 Files changed 20 +2
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files
Showing only changes of commit 7b3ccfc45a - Show all commits

2
stdlib/list.quox
View file

@ -144,6 +144,7 @@ def elimω2 : 0.(A B : ★) → 0.(P : (n : ℕ) → Vec n A → Vec n B → ★
pc x y n xs ys (IH xs ys) pc x y n xs ys (IH xs ys)
} }
{-
postulate elimP : postulate elimP :
ω.(π : NzQty) → ω.(ρₙ ρₗ : Qty) → ω.(π : NzQty) → ω.(ρₙ ρₗ : Qty) →
0.(A : ★) → 0.(P : (n : ℕ) → Vec n A → ★) → 0.(A : ★) → 0.(P : (n : ℕ) → Vec n A → ★) →
@ -156,6 +157,7 @@ postulate elimP :
= =
λ π ρₙ ρₗ A P ⇒ uhhhhhhhhhhhhhhhhhhh λ π ρₙ ρₗ A P ⇒ uhhhhhhhhhhhhhhhhhhh
-} -}
-}
def elimω2-uneven : def elimω2-uneven :
0.(A B : ★) → 0.(P : (m n : ℕ) → Vec m A → Vec n B → ★) → 0.(A B : ★) → 0.(P : (m n : ℕ) → Vec m A → Vec n B → ★) →