We prove the intermediate
claim H1omega:
1 ∈ ω.
We prove the intermediate
claim H1not0:
1 ∉ {0}.
We prove the intermediate
claim Heq:
1 = 0.
An
exact proof term for the current goal is
(SingE 0 1 H1).
An
exact proof term for the current goal is
(neq_1_0 Heq).
An
exact proof term for the current goal is
(setminusI ω {0} 1 H1omega H1not0).
∎