Users' Mathboxes Mathbox for Scott Fenton < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  frr3g Structured version   Visualization version   GIF version

Theorem frr3g 32731
Description: Functions defined by founded recursion are identical up to relation, domain, and characteristic function. General version of frr3. (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 3796 . . . . . . . . . . 11 (∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹𝑤) = (𝐺𝑤)) → (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → ∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤)))
2 r19.26 3137 . . . . . . . . . . . . . 14 (∀𝑦𝐴 ((𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦)))) ↔ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦)))))
32anbi2i 622 . . . . . . . . . . . . 13 (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ ∀𝑦𝐴 ((𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) ↔ ((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))))
4 fveq2 6538 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = 𝑧 → (𝐹𝑦) = (𝐹𝑧))
5 id 22 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = 𝑧𝑦 = 𝑧)
6 predeq3 6027 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = 𝑧 → Pred(𝑅, 𝐴, 𝑦) = Pred(𝑅, 𝐴, 𝑧))
76reseq2d 5734 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = 𝑧 → (𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)) = (𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))
85, 7oveq12d 7034 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = 𝑧 → (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))))
94, 8eqeq12d 2810 . . . . . . . . . . . . . . . . . . 19 (𝑦 = 𝑧 → ((𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ↔ (𝐹𝑧) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))))
10 fveq2 6538 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = 𝑧 → (𝐺𝑦) = (𝐺𝑧))
116reseq2d 5734 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = 𝑧 → (𝐺 ↾ Pred(𝑅, 𝐴, 𝑦)) = (𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)))
125, 11oveq12d 7034 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = 𝑧 → (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))))
1310, 12eqeq12d 2810 . . . . . . . . . . . . . . . . . . 19 (𝑦 = 𝑧 → ((𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))) ↔ (𝐺𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)))))
149, 13anbi12d 630 . . . . . . . . . . . . . . . . . 18 (𝑦 = 𝑧 → (((𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦)))) ↔ ((𝐹𝑧) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) ∧ (𝐺𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))))))
1514rspcva 3557 . . . . . . . . . . . . . . . . 17 ((𝑧𝐴 ∧ ∀𝑦𝐴 ((𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → ((𝐹𝑧) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) ∧ (𝐺𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)))))
16 eqtr3 2818 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) ∧ (𝐹𝑧) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))) → (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))) = (𝐹𝑧))
1716eqcomd 2801 . . . . . . . . . . . . . . . . . . . . 21 (((𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) ∧ (𝐹𝑧) = (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))) → (𝐹𝑧) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))))
18 eqtr3 2818 . . . . . . . . . . . . . . . . . . . . . 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 6030 . . . . . . . . . . . . . . . . . . . . . . 23 Pred(𝑅, 𝐴, 𝑧) ⊆ 𝐴
23 fvreseq 6675 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ Pred(𝑅, 𝐴, 𝑧) ⊆ 𝐴) → ((𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)) = (𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)) ↔ ∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤)))
2422, 23mpan2 687 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐹 Fn 𝐴𝐺 Fn 𝐴) → ((𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)) = (𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)) ↔ ∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤)))
2524biimpar 478 . . . . . . . . . . . . . . . . . . . . 21 (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ ∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤)) → (𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)) = (𝐺 ↾ Pred(𝑅, 𝐴, 𝑧)))
2625oveq2d 7032 . . . . . . . . . . . . . . . . . . . 20 (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ ∀𝑤 ∈ Pred (𝑅, 𝐴, 𝑧)(𝐹𝑤) = (𝐺𝑤)) → (𝑧𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) = (𝑧𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑧))))
2726eqcomd 2801 . . . . . . . . . . . . . . . . . . 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 244 . . . . . . . . . . . 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 6538 . . . . . . . . . . . 12 (𝑧 = 𝑤 → (𝐹𝑧) = (𝐹𝑤))
38 fveq2 6538 . . . . . . . . . . . 12 (𝑧 = 𝑤 → (𝐺𝑧) = (𝐺𝑤))
3937, 38eqeq12d 2810 . . . . . . . . . . 11 (𝑧 = 𝑤 → ((𝐹𝑧) = (𝐺𝑧) ↔ (𝐹𝑤) = (𝐺𝑤)))
4039imbi2d 342 . . . . . . . . . 10 (𝑧 = 𝑤 → ((((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹𝑧) = (𝐺𝑧)) ↔ (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹𝑤) = (𝐺𝑤))))
4136, 40frins2g 32701 . . . . . . . . 9 ((𝑅 Fr 𝐴𝑅 Se 𝐴) → ∀𝑧𝐴 (((𝐹 Fn 𝐴𝐺 Fn 𝐴) ∧ (∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦))) ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹𝑧) = (𝐺𝑧)))
42 rsp 3172 . . . . . . . . 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 656 . . . . . 6 (((𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → ((𝑅 Fr 𝐴𝑅 Se 𝐴) → (𝑧𝐴 → (𝐹𝑧) = (𝐺𝑧))))
4645com12 32 . . . . 5 ((𝑅 Fr 𝐴𝑅 Se 𝐴) → (((𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝑧𝐴 → (𝐹𝑧) = (𝐺𝑧))))
47463impib 1109 . . . 4 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝑧𝐴 → (𝐹𝑧) = (𝐺𝑧)))
4847ralrimiv 3148 . . 3 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → ∀𝑧𝐴 (𝐹𝑧) = (𝐺𝑧))
49 eqid 2795 . . 3 𝐴 = 𝐴
5048, 49jctil 520 . 2 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐴 = 𝐴 ∧ ∀𝑧𝐴 (𝐹𝑧) = (𝐺𝑧)))
51 eqfnfv2 6668 . . . 4 ((𝐹 Fn 𝐴𝐺 Fn 𝐴) → (𝐹 = 𝐺 ↔ (𝐴 = 𝐴 ∧ ∀𝑧𝐴 (𝐹𝑧) = (𝐺𝑧))))
5251ad2ant2r 743 . . 3 (((𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹 = 𝐺 ↔ (𝐴 = 𝐴 ∧ ∀𝑧𝐴 (𝐹𝑧) = (𝐺𝑧))))
53523adant1 1123 . 2 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → (𝐹 = 𝐺 ↔ (𝐴 = 𝐴 ∧ ∀𝑧𝐴 (𝐹𝑧) = (𝐺𝑧))))
5450, 53mpbird 258 1 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐹 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐹𝑦) = (𝑦𝐻(𝐹 ↾ Pred(𝑅, 𝐴, 𝑦)))) ∧ (𝐺 Fn 𝐴 ∧ ∀𝑦𝐴 (𝐺𝑦) = (𝑦𝐻(𝐺 ↾ Pred(𝑅, 𝐴, 𝑦))))) → 𝐹 = 𝐺)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396  w3a 1080   = wceq 1522  wcel 2081  wral 3105  wss 3859   Fr wfr 5399   Se wse 5400  cres 5445  Predcpred 6022   Fn wfn 6220  cfv 6225  (class class class)co 7016
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1777  ax-4 1791  ax-5 1888  ax-6 1947  ax-7 1992  ax-8 2083  ax-9 2091  ax-10 2112  ax-11 2126  ax-12 2141  ax-13 2344  ax-ext 2769  ax-rep 5081  ax-sep 5094  ax-nul 5101  ax-pow 5157  ax-pr 5221  ax-un 7319  ax-inf2 8950
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3or 1081  df-3an 1082  df-tru 1525  df-ex 1762  df-nf 1766  df-sb 2043  df-mo 2576  df-eu 2612  df-clab 2776  df-cleq 2788  df-clel 2863  df-nfc 2935  df-ne 2985  df-ral 3110  df-rex 3111  df-reu 3112  df-rab 3114  df-v 3439  df-sbc 3707  df-csb 3812  df-dif 3862  df-un 3864  df-in 3866  df-ss 3874  df-pss 3876  df-nul 4212  df-if 4382  df-pw 4455  df-sn 4473  df-pr 4475  df-tp 4477  df-op 4479  df-uni 4746  df-iun 4827  df-br 4963  df-opab 5025  df-mpt 5042  df-tr 5064  df-id 5348  df-eprel 5353  df-po 5362  df-so 5363  df-fr 5402  df-se 5403  df-we 5404  df-xp 5449  df-rel 5450  df-cnv 5451  df-co 5452  df-dm 5453  df-rn 5454  df-res 5455  df-ima 5456  df-pred 6023  df-ord 6069  df-on 6070  df-lim 6071  df-suc 6072  df-iota 6189  df-fun 6227  df-fn 6228  df-f 6229  df-f1 6230  df-fo 6231  df-f1o 6232  df-fv 6233  df-ov 7019  df-om 7437  df-wrecs 7798  df-recs 7860  df-rdg 7898  df-trpred 32667
This theorem is referenced by:  frrlem15  32752  frr3  32756
  Copyright terms: Public domain W3C validator