Theorem: Set.inter_idem (GMLInit/Data/Set/Basic.lean)

State before:
α : Sort u_1
β : ?m.20066
γ : ?m.20069
s : Set α
⊢ s.inter s = s
Tactic:
apply Set.ext
State after:
case a
α : Sort u_1
β : ?m.20066
γ : ?m.20069
s : Set α
⊢ ∀ (x : α), x ∈ s.inter s ↔ x ∈ s

State before:
case a
α : Sort u_1
β : ?m.20066
γ : ?m.20069
s : Set α
⊢ ∀ (x : α), x ∈ s.inter s ↔ x ∈ s
Tactic:
intro x
State after:
case a
α : Sort u_1
β : ?m.20066
γ : ?m.20069
s : Set α
x : α
⊢ x ∈ s.inter s ↔ x ∈ s

State before:
case a
α : Sort u_1
β : ?m.20066
γ : ?m.20069
s : Set α
x : α
⊢ x ∈ s.inter s ↔ x ∈ s
Tactic:
constructor
State after:
case a.mp
α : Sort u_1
β : ?m.20066
γ : ?m.20069
s : Set α
x : α
⊢ x ∈ s.inter s → x ∈ s

case a.mpr
α : Sort u_1
β : ?m.20066
γ : ?m.20069
s : Set α
x : α
⊢ x ∈ s → x ∈ s.inter s

State before:
case a.mp
α : Sort u_1
β : ?m.20066
γ : ?m.20069
s : Set α
x : α
⊢ x ∈ s.inter s → x ∈ s
Tactic:
intro ⟨hs, _⟩
State after:
case a.mp
α : Sort u_1
β : ?m.20066
γ : ?m.20069
s : Set α
x : α
hs right✝ : x ∈ s
⊢ x ∈ s

State before:
case a.mp
α : Sort u_1
β : ?m.20066
γ : ?m.20069
s : Set α
x : α
hs right✝ : x ∈ s
⊢ x ∈ s
Tactic:
exact hs
State after:
no goals

State before:
case a.mpr
α : Sort u_1
β : ?m.20066
γ : ?m.20069
s : Set α
x : α
⊢ x ∈ s → x ∈ s.inter s
Tactic:
intro hs
State after:
case a.mpr
α : Sort u_1
β : ?m.20066
γ : ?m.20069
s : Set α
x : α
hs : x ∈ s
⊢ x ∈ s.inter s

State before:
case a.mpr
α : Sort u_1
β : ?m.20066
γ : ?m.20069
s : Set α
x : α
hs : x ∈ s
⊢ x ∈ s.inter s
Tactic:
exact ⟨hs, hs⟩
State after:
no goals