Metamath Proof Explorer


Theorem isrusgr

Description: The property of being a k-regular simple graph. (Contributed by Alexander van der Vekens, 7-Jul-2018) (Revised by AV, 18-Dec-2020)

Ref Expression
Assertion isrusgr ( ( 𝐺𝑊𝐾𝑍 ) → ( 𝐺 RegUSGraph 𝐾 ↔ ( 𝐺 ∈ USGraph ∧ 𝐺 RegGraph 𝐾 ) ) )

Proof

Step Hyp Ref Expression
1 eleq1 ( 𝑔 = 𝐺 → ( 𝑔 ∈ USGraph ↔ 𝐺 ∈ USGraph ) )
2 1 adantr ( ( 𝑔 = 𝐺𝑘 = 𝐾 ) → ( 𝑔 ∈ USGraph ↔ 𝐺 ∈ USGraph ) )
3 breq12 ( ( 𝑔 = 𝐺𝑘 = 𝐾 ) → ( 𝑔 RegGraph 𝑘𝐺 RegGraph 𝐾 ) )
4 2 3 anbi12d ( ( 𝑔 = 𝐺𝑘 = 𝐾 ) → ( ( 𝑔 ∈ USGraph ∧ 𝑔 RegGraph 𝑘 ) ↔ ( 𝐺 ∈ USGraph ∧ 𝐺 RegGraph 𝐾 ) ) )
5 df-rusgr RegUSGraph = { ⟨ 𝑔 , 𝑘 ⟩ ∣ ( 𝑔 ∈ USGraph ∧ 𝑔 RegGraph 𝑘 ) }
6 4 5 brabga ( ( 𝐺𝑊𝐾𝑍 ) → ( 𝐺 RegUSGraph 𝐾 ↔ ( 𝐺 ∈ USGraph ∧ 𝐺 RegGraph 𝐾 ) ) )