This commit addresses the issue raised at https://leanprover.zulipchat.com/#narrow/stream/270676-lean4/topic/Namespace-based.20overloading.20does.20not.20find.20exports/near/282946185
16 lines
317 B
Text
16 lines
317 B
Text
def Set (α : Type) := α → Prop
|
||
|
||
def Set.union (s₁ s₂ : Set α) : Set α :=
|
||
fun a => s₁ a ∨ s₂ a
|
||
|
||
def FinSet (n : Nat) := Fin n → Prop
|
||
|
||
namespace FinSet
|
||
export Set (union)
|
||
end FinSet
|
||
|
||
example (x y : FinSet 10) : FinSet 10 :=
|
||
FinSet.union x y
|
||
|
||
example (x y : FinSet 10) : FinSet 10 :=
|
||
x.union y
|