Loading poly-instantiate.disco... Loaded. foldr : (a → r → r) → r → List(a) → r foldr(λx. λy. x) : a → List(a) → a foldr(λx. λy. y) : r → List(a) → r foldr(λx. λy. x + 1) : ℕ → List(ℕ) → ℕ foldr(λx. λy. y + 1) : ℕ → List(a) → ℕ foldr(λx. λy. y + 1)(1) : List(a) → ℕ foldr(λx. λy. y + 1)(-1) : List(a) → ℤ foldr(λx. λy. x)(false) : List(Bool) → Bool foldr(λx. λy. x + 1)(1 / 2) : List(ℕ) → 𝔽 foldr(λx. λy. x - 1)(1 / 2) : List(ℤ) → ℚ