MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  frr3g Structured version   Visualization version   GIF version

Theorem frr3g 9592
Description: Functions defined by well-founded recursion are identical up to relation, domain, and characteristic function. General version of frr3 9597. (Contributed by Scott Fenton, 10-Feb-2011.) (Revised by Mario Carneiro, 26-Jun-2015.)
Assertion
Ref Expression
frr3g (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → 𝐹 = 𝐺)
Distinct variable groups:   𝑦,𝐴   𝑦,𝐹   𝑦,𝐺   𝑦,𝐻   𝑦,𝑅

Proof of Theorem frr3g
Dummy variables 𝑤 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 ra4v 3828 . . . . . . . . . . 11 (∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹𝑤) = (𝐺𝑤)) → (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → ∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤)))
2 r19.26 3111 . . . . . . . . . . . . . 14 (∀𝑦𝐴 ((𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦)))) ↔ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦)))))
32anbi2i 623 . . . . . . . . . . . . 13 (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ ∀𝑦𝐴 ((𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) ↔ ((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))))
4 fveq2 6812 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = 𝑧 → (𝐹𝑦) = (𝐹𝑧))
5 id 22 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = 𝑧𝑦 = 𝑧)
6 predeq3 6229 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = 𝑧 → Pred(𝑅, 𝐴, 𝑦) = Pred(𝑅, 𝐴, 𝑧))
76reseq2d 5911 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = 𝑧 → (𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)) = (𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))
85, 7oveq12d 7335 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = 𝑧 → (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))))
94, 8eqeq12d 2753 . . . . . . . . . . . . . . . . . . 19 (𝑦 = 𝑧 → ((𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ↔ (𝐹𝑧) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))))
10 fveq2 6812 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = 𝑧 → (𝐺𝑦) = (𝐺𝑧))
116reseq2d 5911 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = 𝑧 → (𝐺 ↾ Pred(𝑅, 𝐴, 𝑦)) = (𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)))
125, 11oveq12d 7335 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = 𝑧 → (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))))
1310, 12eqeq12d 2753 . . . . . . . . . . . . . . . . . . 19 (𝑦 = 𝑧 → ((𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))) ↔ (𝐺𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)))))
149, 13anbi12d 631 . . . . . . . . . . . . . . . . . 18 (𝑦 = 𝑧 → (((𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦)))) ↔ ((𝐹𝑧) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) ∧ (𝐺𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))))))
1514rspcva 3568 . . . . . . . . . . . . . . . . 17 ((𝑧𝐴 ∧ ∀𝑦𝐴 ((𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → ((𝐹𝑧) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) ∧ (𝐺𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)))))
16 eqtr3 2763 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) ∧ (𝐹𝑧) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))) → (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))) = (𝐹𝑧))
1716eqcomd 2743 . . . . . . . . . . . . . . . . . . . . 21 (((𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) ∧ (𝐹𝑧) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))) → (𝐹𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))))
18 eqtr3 2763 . . . . . . . . . . . . . . . . . . . . . 22 (((𝐹𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))) ∧ (𝐺𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)))) → (𝐹𝑧) = (𝐺𝑧))
1918ex 413 . . . . . . . . . . . . . . . . . . . . 21 ((𝐹𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))) → ((𝐺𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))) → (𝐹𝑧) = (𝐺𝑧)))
2017, 19syl 17 . . . . . . . . . . . . . . . . . . . 20 (((𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) ∧ (𝐹𝑧) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))) → ((𝐺𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))) → (𝐹𝑧) = (𝐺𝑧)))
2120expimpd 454 . . . . . . . . . . . . . . . . . . 19 ((𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) → (((𝐹𝑧) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) ∧ (𝐺𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)))) → (𝐹𝑧) = (𝐺𝑧)))
22 predss 6233 . . . . . . . . . . . . . . . . . . . . . . 23 Pred(𝑅, 𝐴, 𝑧) ⊆ 𝐴
23 fvreseq 6957 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ Pred(𝑅, 𝐴, 𝑧) ⊆ 𝐴) → ((𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)) = (𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)) ↔ ∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤)))
2422, 23mpan2 688 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐹 Fn 𝐴𝐺 Fn 𝐴) → ((𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)) = (𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)) ↔ ∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤)))
2524biimpar 478 . . . . . . . . . . . . . . . . . . . . 21 (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ ∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤)) → (𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)) = (𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)))
2625oveq2d 7333 . . . . . . . . . . . . . . . . . . . 20 (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ ∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤)) → (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))))
2726eqcomd 2743 . . . . . . . . . . . . . . . . . . 19 (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ ∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤)) → (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))))
2821, 27syl11 33 . . . . . . . . . . . . . . . . . 18 (((𝐹𝑧) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) ∧ (𝐺𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)))) → (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ ∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤)) → (𝐹𝑧) = (𝐺𝑧)))
2928expd 416 . . . . . . . . . . . . . . . . 17 (((𝐹𝑧) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) ∧ (𝐺𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)))) → ((𝐹 Fn 𝐴𝐺 Fn 𝐴) → (∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤) → (𝐹𝑧) = (𝐺𝑧))))
3015, 29syl 17 . . . . . . . . . . . . . . . 16 ((𝑧𝐴 ∧ ∀𝑦𝐴 ((𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → ((𝐹 Fn 𝐴𝐺 Fn 𝐴) → (∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤) → (𝐹𝑧) = (𝐺𝑧))))
3130ex 413 . . . . . . . . . . . . . . 15 (𝑧𝐴 → (∀𝑦𝐴 ((𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦)))) → ((𝐹 Fn 𝐴𝐺 Fn 𝐴) → (∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤) → (𝐹𝑧) = (𝐺𝑧)))))
3231com23 86 . . . . . . . . . . . . . 14 (𝑧𝐴 → ((𝐹 Fn 𝐴𝐺 Fn 𝐴) → (∀𝑦𝐴 ((𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦)))) → (∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤) → (𝐹𝑧) = (𝐺𝑧)))))
3332impd 411 . . . . . . . . . . . . 13 (𝑧𝐴 → (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ ∀𝑦𝐴 ((𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤) → (𝐹𝑧) = (𝐺𝑧))))
343, 33syl5bir 242 . . . . . . . . . . . 12 (𝑧𝐴 → (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤) → (𝐹𝑧) = (𝐺𝑧))))
3534a2d 29 . . . . . . . . . . 11 (𝑧𝐴 → ((((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → ∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤)) → (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹𝑧) = (𝐺𝑧))))
361, 35syl5 34 . . . . . . . . . 10 (𝑧𝐴 → (∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹𝑤) = (𝐺𝑤)) → (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹𝑧) = (𝐺𝑧))))
37 fveq2 6812 . . . . . . . . . . . 12 (𝑧 = 𝑤 → (𝐹𝑧) = (𝐹𝑤))
38 fveq2 6812 . . . . . . . . . . . 12 (𝑧 = 𝑤 → (𝐺𝑧) = (𝐺𝑤))
3937, 38eqeq12d 2753 . . . . . . . . . . 11 (𝑧 = 𝑤 → ((𝐹𝑧) = (𝐺𝑧) ↔ (𝐹𝑤) = (𝐺𝑤)))
4039imbi2d 340 . . . . . . . . . 10 (𝑧 = 𝑤 → ((((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹𝑧) = (𝐺𝑧)) ↔ (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹𝑤) = (𝐺𝑤))))
4136, 40frins2 9590 . . . . . . . . 9 ((𝑅 Fr 𝐴𝑅 Se 𝐴) → ∀𝑧𝐴 (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹𝑧) = (𝐺𝑧)))
42 rsp 3227 . . . . . . . . 9 (∀𝑧𝐴 (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹𝑧) = (𝐺𝑧)) → (𝑧𝐴 → (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹𝑧) = (𝐺𝑧))))
4341, 42syl 17 . . . . . . . 8 ((𝑅 Fr 𝐴𝑅 Se 𝐴) → (𝑧𝐴 → (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹𝑧) = (𝐺𝑧))))
4443com3r 87 . . . . . . 7 (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → ((𝑅 Fr 𝐴𝑅 Se 𝐴) → (𝑧𝐴 → (𝐹𝑧) = (𝐺𝑧))))
4544an4s 657 . . . . . 6 (((𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → ((𝑅 Fr 𝐴𝑅 Se 𝐴) → (𝑧𝐴 → (𝐹𝑧) = (𝐺𝑧))))
4645com12 32 . . . . 5 ((𝑅 Fr 𝐴𝑅 Se 𝐴) → (((𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝑧𝐴 → (𝐹𝑧) = (𝐺𝑧))))
47463impib 1115 . . . 4 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝑧𝐴 → (𝐹𝑧) = (𝐺𝑧)))
4847ralrimiv 3139 . . 3 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → ∀𝑧𝐴 (𝐹𝑧) = (𝐺𝑧))
49 eqid 2737 . . 3 𝐴 = 𝐴
5048, 49jctil 520 . 2 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐴 = 𝐴 ∧ ∀𝑧𝐴 (𝐹𝑧) = (𝐺𝑧)))
51 eqfnfv2 6950 . . . 4 ((𝐹 Fn 𝐴𝐺 Fn 𝐴) → (𝐹 = 𝐺 ↔ (𝐴 = 𝐴 ∧ ∀𝑧𝐴 (𝐹𝑧) = (𝐺𝑧))))
5251ad2ant2r 744 . . 3 (((𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹 = 𝐺 ↔ (𝐴 = 𝐴 ∧ ∀𝑧𝐴 (𝐹𝑧) = (𝐺𝑧))))
53523adant1 1129 . 2 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹 = 𝐺 ↔ (𝐴 = 𝐴 ∧ ∀𝑧𝐴 (𝐹𝑧) = (𝐺𝑧))))
5450, 53mpbird 256 1 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → 𝐹 = 𝐺)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 396  w3a 1086   = wceq 1540  wcel 2105  wral 3062  wss 3897   Fr wfr 5560   Se wse 5561  cres 5610  Predcpred 6224   Fn wfn 6461  cfv 6466  (class class class)co 7317
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2708  ax-rep 5224  ax-sep 5238  ax-nul 5245  ax-pr 5367  ax-un 7630  ax-inf2 9477
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2887  df-ne 2942  df-ral 3063  df-rex 3072  df-rmo 3350  df-reu 3351  df-rab 3405  df-v 3443  df-sbc 3727  df-csb 3843  df-dif 3900  df-un 3902  df-in 3904  df-ss 3914  df-pss 3916  df-nul 4268  df-if 4472  df-pw 4547  df-sn 4572  df-pr 4574  df-op 4578  df-uni 4851  df-int 4893  df-iun 4939  df-br 5088  df-opab 5150  df-mpt 5171  df-tr 5205  df-id 5507  df-eprel 5513  df-po 5521  df-so 5522  df-fr 5563  df-se 5564  df-we 5565  df-xp 5614  df-rel 5615  df-cnv 5616  df-co 5617  df-dm 5618  df-rn 5619  df-res 5620  df-ima 5621  df-pred 6225  df-ord 6292  df-on 6293  df-lim 6294  df-suc 6295  df-iota 6418  df-fun 6468  df-fn 6469  df-f 6470  df-f1 6471  df-fo 6472  df-f1o 6473  df-fv 6474  df-riota 7274  df-ov 7320  df-oprab 7321  df-mpo 7322  df-om 7760  df-2nd 7879  df-frecs 8146  df-wrecs 8177  df-recs 8251  df-rdg 8290  df-1o 8346  df-oadd 8350  df-ttrcl 9544
This theorem is referenced by:  frrlem15  9593  frr3  9597
  Copyright terms: Public domain W3C validator