| Step | Hyp | Ref
| Expression |
| 1 | | par2cat 50859 |
. 2
⊢
{〈(Base‘ndx), 2o〉, 〈(Hom ‘ndx),
(𝑚 ∈ 2o,
𝑛 ∈ 2o
↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o),
2o, ∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} ∈ Cat |
| 2 | | eqid 2760 |
. . 3
⊢
(SetCat‘1o) =
(SetCat‘1o) |
| 3 | | eqid 2760 |
. . 3
⊢
{〈(Base‘ndx), 2o〉, 〈(Hom ‘ndx),
(𝑚 ∈ 2o,
𝑛 ∈ 2o
↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o),
2o, ∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} = {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} |
| 4 | | eqid 2760 |
. . 3
⊢
((SetCat‘1o) FuncCat {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}) = ((SetCat‘1o)
FuncCat {〈(Base‘ndx), 2o〉, 〈(Hom ‘ndx),
(𝑚 ∈ 2o,
𝑛 ∈ 2o
↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o),
2o, ∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}) |
| 5 | | eqid 2760 |
. . 3
⊢
(〈(SetCat‘1o), (SetCat‘1o)〉
∘F {〈(Base‘ndx), 2o〉,
〈(Hom ‘ndx), (𝑚
∈ 2o, 𝑛
∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}) =
(〈(SetCat‘1o), (SetCat‘1o)〉
∘F {〈(Base‘ndx), 2o〉,
〈(Hom ‘ndx), (𝑚
∈ 2o, 𝑛
∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}) |
| 6 | | eqid 2760 |
. . 3
⊢
(((SetCat‘1o) FuncCat {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}) ×c
((SetCat‘1o) FuncCat (SetCat‘1o))) =
(((SetCat‘1o) FuncCat {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}) ×c
((SetCat‘1o) FuncCat
(SetCat‘1o))) |
| 7 | 2, 3, 4, 5, 6 | fuconuniq2 50876 |
. 2
⊢
∃𝑧((1st
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F {〈(Base‘ndx), 2o〉,
〈(Hom ‘ndx), (𝑚
∈ 2o, 𝑛
∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))((((SetCat‘1o)
FuncCat {〈(Base‘ndx), 2o〉, 〈(Hom ‘ndx),
(𝑚 ∈ 2o,
𝑛 ∈ 2o
↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o),
2o, ∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}) ×c
((SetCat‘1o) FuncCat (SetCat‘1o))) Func
((SetCat‘1o) FuncCat {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))𝑧 ∧ 𝑧 ≠ (2nd
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F {〈(Base‘ndx), 2o〉,
〈(Hom ‘ndx), (𝑚
∈ 2o, 𝑛
∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))) |
| 8 | | oveq2 7428 |
. . . . . . 7
⊢ (𝑒 = {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} →
(〈(SetCat‘1o), (SetCat‘1o)〉
∘F 𝑒) = (〈(SetCat‘1o),
(SetCat‘1o)〉 ∘F
{〈(Base‘ndx), 2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦
if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉})) |
| 9 | 8 | fveq2d 6889 |
. . . . . 6
⊢ (𝑒 = {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} → (1st
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F 𝑒)) = (1st
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F {〈(Base‘ndx), 2o〉,
〈(Hom ‘ndx), (𝑚
∈ 2o, 𝑛
∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))) |
| 10 | | oveq2 7428 |
. . . . . . . 8
⊢ (𝑒 = {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} →
((SetCat‘1o) FuncCat 𝑒) = ((SetCat‘1o) FuncCat
{〈(Base‘ndx), 2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦
if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉})) |
| 11 | 10 | oveq1d 7435 |
. . . . . . 7
⊢ (𝑒 = {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} →
(((SetCat‘1o) FuncCat 𝑒) ×c
((SetCat‘1o) FuncCat (SetCat‘1o))) =
(((SetCat‘1o) FuncCat {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}) ×c
((SetCat‘1o) FuncCat
(SetCat‘1o)))) |
| 12 | 11, 10 | oveq12d 7438 |
. . . . . 6
⊢ (𝑒 = {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} →
((((SetCat‘1o) FuncCat 𝑒) ×c
((SetCat‘1o) FuncCat (SetCat‘1o))) Func
((SetCat‘1o) FuncCat 𝑒)) = ((((SetCat‘1o) FuncCat
{〈(Base‘ndx), 2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦
if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}) ×c
((SetCat‘1o) FuncCat (SetCat‘1o))) Func
((SetCat‘1o) FuncCat {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))) |
| 13 | | eqidd 2761 |
. . . . . 6
⊢ (𝑒 = {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} → 𝑧 = 𝑧) |
| 14 | 9, 12, 13 | breq123d 5116 |
. . . . 5
⊢ (𝑒 = {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} → ((1st
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F 𝑒))((((SetCat‘1o) FuncCat
𝑒)
×c ((SetCat‘1o) FuncCat
(SetCat‘1o))) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ↔ (1st
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F {〈(Base‘ndx), 2o〉,
〈(Hom ‘ndx), (𝑚
∈ 2o, 𝑛
∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))((((SetCat‘1o)
FuncCat {〈(Base‘ndx), 2o〉, 〈(Hom ‘ndx),
(𝑚 ∈ 2o,
𝑛 ∈ 2o
↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o),
2o, ∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}) ×c
((SetCat‘1o) FuncCat (SetCat‘1o))) Func
((SetCat‘1o) FuncCat {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))𝑧)) |
| 15 | 8 | fveq2d 6889 |
. . . . . 6
⊢ (𝑒 = {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} → (2nd
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F 𝑒)) = (2nd
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F {〈(Base‘ndx), 2o〉,
〈(Hom ‘ndx), (𝑚
∈ 2o, 𝑛
∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))) |
| 16 | 15 | neeq2d 3015 |
. . . . 5
⊢ (𝑒 = {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} → (𝑧 ≠ (2nd
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F 𝑒)) ↔ 𝑧 ≠ (2nd
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F {〈(Base‘ndx), 2o〉,
〈(Hom ‘ndx), (𝑚
∈ 2o, 𝑛
∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉})))) |
| 17 | 14, 16 | anbi12d 644 |
. . . 4
⊢ (𝑒 = {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} → (((1st
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F 𝑒))((((SetCat‘1o) FuncCat
𝑒)
×c ((SetCat‘1o) FuncCat
(SetCat‘1o))) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F 𝑒))) ↔ ((1st
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F {〈(Base‘ndx), 2o〉,
〈(Hom ‘ndx), (𝑚
∈ 2o, 𝑛
∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))((((SetCat‘1o)
FuncCat {〈(Base‘ndx), 2o〉, 〈(Hom ‘ndx),
(𝑚 ∈ 2o,
𝑛 ∈ 2o
↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o),
2o, ∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}) ×c
((SetCat‘1o) FuncCat (SetCat‘1o))) Func
((SetCat‘1o) FuncCat {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))𝑧 ∧ 𝑧 ≠ (2nd
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F {〈(Base‘ndx), 2o〉,
〈(Hom ‘ndx), (𝑚
∈ 2o, 𝑛
∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))))) |
| 18 | 17 | exbidv 1953 |
. . 3
⊢ (𝑒 = {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} → (∃𝑧((1st
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F 𝑒))((((SetCat‘1o) FuncCat
𝑒)
×c ((SetCat‘1o) FuncCat
(SetCat‘1o))) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F 𝑒))) ↔ ∃𝑧((1st
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F {〈(Base‘ndx), 2o〉,
〈(Hom ‘ndx), (𝑚
∈ 2o, 𝑛
∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))((((SetCat‘1o)
FuncCat {〈(Base‘ndx), 2o〉, 〈(Hom ‘ndx),
(𝑚 ∈ 2o,
𝑛 ∈ 2o
↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o),
2o, ∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}) ×c
((SetCat‘1o) FuncCat (SetCat‘1o))) Func
((SetCat‘1o) FuncCat {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))𝑧 ∧ 𝑧 ≠ (2nd
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F {〈(Base‘ndx), 2o〉,
〈(Hom ‘ndx), (𝑚
∈ 2o, 𝑛
∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))))) |
| 19 | 18 | rspcev 3576 |
. 2
⊢
(({〈(Base‘ndx), 2o〉, 〈(Hom ‘ndx),
(𝑚 ∈ 2o,
𝑛 ∈ 2o
↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o),
2o, ∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉} ∈ Cat ∧ ∃𝑧((1st
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F {〈(Base‘ndx), 2o〉,
〈(Hom ‘ndx), (𝑚
∈ 2o, 𝑛
∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))((((SetCat‘1o)
FuncCat {〈(Base‘ndx), 2o〉, 〈(Hom ‘ndx),
(𝑚 ∈ 2o,
𝑛 ∈ 2o
↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o),
2o, ∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}) ×c
((SetCat‘1o) FuncCat (SetCat‘1o))) Func
((SetCat‘1o) FuncCat {〈(Base‘ndx),
2o〉, 〈(Hom ‘ndx), (𝑚 ∈ 2o, 𝑛 ∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉}))𝑧 ∧ 𝑧 ≠ (2nd
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F {〈(Base‘ndx), 2o〉,
〈(Hom ‘ndx), (𝑚
∈ 2o, 𝑛
∈ 2o ↦ if(𝑚 = 𝑛, {2o}, if((𝑚 = ∅ ∧ 𝑛 = 1o), 2o,
∅)))〉, 〈(comp‘ndx), (𝑝 ∈ (2o ×
2o), 𝑞 ∈
2o ↦ (𝑟
∈ 3o, 𝑠
∈ 3o ↦ (𝑟 ∩ 𝑠)))〉})))) → ∃𝑒 ∈ Cat ∃𝑧((1st
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F 𝑒))((((SetCat‘1o) FuncCat
𝑒)
×c ((SetCat‘1o) FuncCat
(SetCat‘1o))) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F 𝑒)))) |
| 20 | 1, 7, 19 | mp2an 705 |
1
⊢
∃𝑒 ∈ Cat
∃𝑧((1st
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F 𝑒))((((SetCat‘1o) FuncCat
𝑒)
×c ((SetCat‘1o) FuncCat
(SetCat‘1o))) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd
‘(〈(SetCat‘1o), (SetCat‘1o)〉
∘F 𝑒))) |