comment out a partial definition in list.quox

2024-06-02 17:34:52 +02:00 · 2024-06-02 17:34:52 +02:00 · 7b3ccfc45a
parent 519cc4779a
commit 7b3ccfc45a
1 changed files with 2 additions and 0 deletions
--- a/stdlib/list.quox
+++ b/stdlib/list.quox
@ -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)
    }

+{-
 postulate elimP :
    ω.(π : NzQty) → ω.(ρₙ ρₗ : Qty) →
    0.(A : ★) → 0.(P : (n : ℕ) → Vec n A → ★) →
@ -156,6 +157,7 @@ postulate elimP :
  =
  λ π ρₙ ρₗ A P ⇒ uhhhhhhhhhhhhhhhhhhh
 -}
+-}

 def elimω2-uneven :
    0.(A B : ★) → 0.(P : (m n : ℕ) → Vec m A → Vec n B → ★) →