Metamath Proof Explorer


Theorem fiinfg

Description: Lemma showing existence and closure of infimum of a finite set. (Contributed by AV, 6-Oct-2020)

Ref Expression
Assertion fiinfg R Or A A Fin A x A y A ¬ y R x y A x R y z A z R y

Proof

Step Hyp Ref Expression
1 fiming R Or A A Fin A x A y A x y x R y
2 equcom x = y y = x
3 sotrieq2 R Or A y A x A y = x ¬ y R x ¬ x R y
4 3 ancom2s R Or A x A y A y = x ¬ y R x ¬ x R y
5 2 4 bitrid R Or A x A y A x = y ¬ y R x ¬ x R y
6 5 simprbda R Or A x A y A x = y ¬ y R x
7 6 ex R Or A x A y A x = y ¬ y R x
8 7 anassrs R Or A x A y A x = y ¬ y R x
9 8 a1dd R Or A x A y A x = y x y x R y ¬ y R x
10 pm2.27 x y x y x R y x R y
11 soasym R Or A x A y A x R y ¬ y R x
12 11 anassrs R Or A x A y A x R y ¬ y R x
13 10 12 syl9r R Or A x A y A x y x y x R y ¬ y R x
14 9 13 pm2.61dne R Or A x A y A x y x R y ¬ y R x
15 14 ralimdva R Or A x A y A x y x R y y A ¬ y R x
16 breq1 z = x z R y x R y
17 16 rspcev x A x R y z A z R y
18 17 ex x A x R y z A z R y
19 18 ralrimivw x A y A x R y z A z R y
20 19 adantl R Or A x A y A x R y z A z R y
21 15 20 jctird R Or A x A y A x y x R y y A ¬ y R x y A x R y z A z R y
22 21 reximdva R Or A x A y A x y x R y x A y A ¬ y R x y A x R y z A z R y
23 22 3ad2ant1 R Or A A Fin A x A y A x y x R y x A y A ¬ y R x y A x R y z A z R y
24 1 23 mpd R Or A A Fin A x A y A ¬ y R x y A x R y z A z R y