Metamath Proof Explorer


Theorem gpgprismgr4cycllem3

Description: Lemma 3 for gpgprismgr4cycl0 . (Contributed by AV, 5-Nov-2025)

Ref Expression
Hypothesis gpgprismgr4cycllem1.f 𝐹 = ⟨“ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ”⟩
Assertion gpgprismgr4cycllem3 ( ( 𝑁 ∈ ( ℤ ‘ 3 ) ∧ 𝑋 ∈ ( 0 ..^ 4 ) ) → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )

Proof

Step Hyp Ref Expression
1 gpgprismgr4cycllem1.f 𝐹 = ⟨“ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ”⟩
2 fzo0to42pr ( 0 ..^ 4 ) = ( { 0 , 1 } ∪ { 2 , 3 } )
3 2 eleq2i ( 𝑋 ∈ ( 0 ..^ 4 ) ↔ 𝑋 ∈ ( { 0 , 1 } ∪ { 2 , 3 } ) )
4 elun ( 𝑋 ∈ ( { 0 , 1 } ∪ { 2 , 3 } ) ↔ ( 𝑋 ∈ { 0 , 1 } ∨ 𝑋 ∈ { 2 , 3 } ) )
5 3 4 bitri ( 𝑋 ∈ ( 0 ..^ 4 ) ↔ ( 𝑋 ∈ { 0 , 1 } ∨ 𝑋 ∈ { 2 , 3 } ) )
6 elpri ( 𝑋 ∈ { 0 , 1 } → ( 𝑋 = 0 ∨ 𝑋 = 1 ) )
7 0elpr01 0 ∈ { 0 , 1 }
8 7 a1i ( 𝑁 ∈ ( ℤ ‘ 3 ) → 0 ∈ { 0 , 1 } )
9 eluz3nn ( 𝑁 ∈ ( ℤ ‘ 3 ) → 𝑁 ∈ ℕ )
10 lbfzo0 ( 0 ∈ ( 0 ..^ 𝑁 ) ↔ 𝑁 ∈ ℕ )
11 9 10 sylibr ( 𝑁 ∈ ( ℤ ‘ 3 ) → 0 ∈ ( 0 ..^ 𝑁 ) )
12 8 11 opelxpd ( 𝑁 ∈ ( ℤ ‘ 3 ) → ⟨ 0 , 0 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) )
13 1nn0 1 ∈ ℕ0
14 13 a1i ( 𝑁 ∈ ( ℤ ‘ 3 ) → 1 ∈ ℕ0 )
15 uzuzle23 ( 𝑁 ∈ ( ℤ ‘ 3 ) → 𝑁 ∈ ( ℤ ‘ 2 ) )
16 eluz2gt1 ( 𝑁 ∈ ( ℤ ‘ 2 ) → 1 < 𝑁 )
17 15 16 syl ( 𝑁 ∈ ( ℤ ‘ 3 ) → 1 < 𝑁 )
18 elfzo0 ( 1 ∈ ( 0 ..^ 𝑁 ) ↔ ( 1 ∈ ℕ0𝑁 ∈ ℕ ∧ 1 < 𝑁 ) )
19 14 9 17 18 syl3anbrc ( 𝑁 ∈ ( ℤ ‘ 3 ) → 1 ∈ ( 0 ..^ 𝑁 ) )
20 8 19 opelxpd ( 𝑁 ∈ ( ℤ ‘ 3 ) → ⟨ 0 , 1 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) )
21 prelpwi ( ( ⟨ 0 , 0 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ⟨ 0 , 1 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ) → { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) )
22 12 20 21 syl2anc ( 𝑁 ∈ ( ℤ ‘ 3 ) → { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) )
23 opeq2 ( 𝑥 = 0 → ⟨ 0 , 𝑥 ⟩ = ⟨ 0 , 0 ⟩ )
24 oveq1 ( 𝑥 = 0 → ( 𝑥 + 1 ) = ( 0 + 1 ) )
25 24 oveq1d ( 𝑥 = 0 → ( ( 𝑥 + 1 ) mod 𝑁 ) = ( ( 0 + 1 ) mod 𝑁 ) )
26 25 opeq2d ( 𝑥 = 0 → ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ = ⟨ 0 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ )
27 23 26 preq12d ( 𝑥 = 0 → { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 0 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } )
28 27 eqeq2d ( 𝑥 = 0 → ( { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 0 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ) )
29 opeq2 ( 𝑥 = 0 → ⟨ 1 , 𝑥 ⟩ = ⟨ 1 , 0 ⟩ )
30 23 29 preq12d ( 𝑥 = 0 → { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 1 , 0 ⟩ } )
31 30 eqeq2d ( 𝑥 = 0 → ( { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ↔ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 1 , 0 ⟩ } ) )
32 25 opeq2d ( 𝑥 = 0 → ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ = ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ )
33 29 32 preq12d ( 𝑥 = 0 → { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } = { ⟨ 1 , 0 ⟩ , ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } )
34 33 eqeq2d ( 𝑥 = 0 → ( { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 1 , 0 ⟩ , ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ) )
35 28 31 34 3orbi123d ( 𝑥 = 0 → ( ( { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ↔ ( { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 0 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 1 , 0 ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 1 , 0 ⟩ , ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ) ) )
36 eluzelre ( 𝑁 ∈ ( ℤ ‘ 3 ) → 𝑁 ∈ ℝ )
37 1mod ( ( 𝑁 ∈ ℝ ∧ 1 < 𝑁 ) → ( 1 mod 𝑁 ) = 1 )
38 36 17 37 syl2anc ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( 1 mod 𝑁 ) = 1 )
39 1e0p1 1 = ( 0 + 1 )
40 39 oveq1i ( 1 mod 𝑁 ) = ( ( 0 + 1 ) mod 𝑁 )
41 38 40 eqtr3di ( 𝑁 ∈ ( ℤ ‘ 3 ) → 1 = ( ( 0 + 1 ) mod 𝑁 ) )
42 41 opeq2d ( 𝑁 ∈ ( ℤ ‘ 3 ) → ⟨ 0 , 1 ⟩ = ⟨ 0 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ )
43 42 preq2d ( 𝑁 ∈ ( ℤ ‘ 3 ) → { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 0 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } )
44 43 3mix1d ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 0 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 1 , 0 ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 1 , 0 ⟩ , ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ) )
45 35 11 44 rspcedvdw ( 𝑁 ∈ ( ℤ ‘ 3 ) → ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) )
46 22 45 jca ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )
47 fveq2 ( 𝑋 = 0 → ( 𝐹𝑋 ) = ( 𝐹 ‘ 0 ) )
48 1 fveq1i ( 𝐹 ‘ 0 ) = ( ⟨“ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ”⟩ ‘ 0 )
49 prex { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } ∈ V
50 s4fv0 ( { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } ∈ V → ( ⟨“ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ”⟩ ‘ 0 ) = { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } )
51 49 50 ax-mp ( ⟨“ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ”⟩ ‘ 0 ) = { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ }
52 48 51 eqtri ( 𝐹 ‘ 0 ) = { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ }
53 47 52 eqtrdi ( 𝑋 = 0 → ( 𝐹𝑋 ) = { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } )
54 53 eleq1d ( 𝑋 = 0 → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ↔ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ) )
55 53 eqeq1d ( 𝑋 = 0 → ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) )
56 53 eqeq1d ( 𝑋 = 0 → ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ↔ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ) )
57 53 eqeq1d ( 𝑋 = 0 → ( ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) )
58 55 56 57 3orbi123d ( 𝑋 = 0 → ( ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ↔ ( { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )
59 58 rexbidv ( 𝑋 = 0 → ( ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ↔ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )
60 54 59 anbi12d ( 𝑋 = 0 → ( ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ↔ ( { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
61 46 60 imbitrrid ( 𝑋 = 0 → ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
62 1elpr01 1 ∈ { 0 , 1 }
63 62 a1i ( 𝑁 ∈ ( ℤ ‘ 3 ) → 1 ∈ { 0 , 1 } )
64 63 19 opelxpd ( 𝑁 ∈ ( ℤ ‘ 3 ) → ⟨ 1 , 1 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) )
65 prelpwi ( ( ⟨ 0 , 1 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ⟨ 1 , 1 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ) → { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) )
66 20 64 65 syl2anc ( 𝑁 ∈ ( ℤ ‘ 3 ) → { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) )
67 opeq2 ( 𝑥 = 1 → ⟨ 0 , 𝑥 ⟩ = ⟨ 0 , 1 ⟩ )
68 oveq1 ( 𝑥 = 1 → ( 𝑥 + 1 ) = ( 1 + 1 ) )
69 68 oveq1d ( 𝑥 = 1 → ( ( 𝑥 + 1 ) mod 𝑁 ) = ( ( 1 + 1 ) mod 𝑁 ) )
70 69 opeq2d ( 𝑥 = 1 → ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ = ⟨ 0 , ( ( 1 + 1 ) mod 𝑁 ) ⟩ )
71 67 70 preq12d ( 𝑥 = 1 → { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } = { ⟨ 0 , 1 ⟩ , ⟨ 0 , ( ( 1 + 1 ) mod 𝑁 ) ⟩ } )
72 71 eqeq2d ( 𝑥 = 1 → ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 1 ⟩ , ⟨ 0 , ( ( 1 + 1 ) mod 𝑁 ) ⟩ } ) )
73 opeq2 ( 𝑥 = 1 → ⟨ 1 , 𝑥 ⟩ = ⟨ 1 , 1 ⟩ )
74 67 73 preq12d ( 𝑥 = 1 → { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } = { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } )
75 74 eqeq2d ( 𝑥 = 1 → ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ↔ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } ) )
76 69 opeq2d ( 𝑥 = 1 → ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ = ⟨ 1 , ( ( 1 + 1 ) mod 𝑁 ) ⟩ )
77 73 76 preq12d ( 𝑥 = 1 → { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } = { ⟨ 1 , 1 ⟩ , ⟨ 1 , ( ( 1 + 1 ) mod 𝑁 ) ⟩ } )
78 77 eqeq2d ( 𝑥 = 1 → ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 1 , 1 ⟩ , ⟨ 1 , ( ( 1 + 1 ) mod 𝑁 ) ⟩ } ) )
79 72 75 78 3orbi123d ( 𝑥 = 1 → ( ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ↔ ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 1 ⟩ , ⟨ 0 , ( ( 1 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 1 , 1 ⟩ , ⟨ 1 , ( ( 1 + 1 ) mod 𝑁 ) ⟩ } ) ) )
80 eqid { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ }
81 80 3mix2i ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 1 ⟩ , ⟨ 0 , ( ( 1 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 1 , 1 ⟩ , ⟨ 1 , ( ( 1 + 1 ) mod 𝑁 ) ⟩ } )
82 81 a1i ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 1 ⟩ , ⟨ 0 , ( ( 1 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 1 , 1 ⟩ , ⟨ 1 , ( ( 1 + 1 ) mod 𝑁 ) ⟩ } ) )
83 79 19 82 rspcedvdw ( 𝑁 ∈ ( ℤ ‘ 3 ) → ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) )
84 66 83 jca ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )
85 fveq2 ( 𝑋 = 1 → ( 𝐹𝑋 ) = ( 𝐹 ‘ 1 ) )
86 1 fveq1i ( 𝐹 ‘ 1 ) = ( ⟨“ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ”⟩ ‘ 1 )
87 prex { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } ∈ V
88 s4fv1 ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } ∈ V → ( ⟨“ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ”⟩ ‘ 1 ) = { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } )
89 87 88 ax-mp ( ⟨“ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ”⟩ ‘ 1 ) = { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ }
90 86 89 eqtri ( 𝐹 ‘ 1 ) = { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ }
91 85 90 eqtrdi ( 𝑋 = 1 → ( 𝐹𝑋 ) = { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } )
92 91 eleq1d ( 𝑋 = 1 → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ↔ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ) )
93 91 eqeq1d ( 𝑋 = 1 → ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) )
94 91 eqeq1d ( 𝑋 = 1 → ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ↔ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ) )
95 91 eqeq1d ( 𝑋 = 1 → ( ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) )
96 93 94 95 3orbi123d ( 𝑋 = 1 → ( ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ↔ ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )
97 96 rexbidv ( 𝑋 = 1 → ( ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ↔ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )
98 92 97 anbi12d ( 𝑋 = 1 → ( ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ↔ ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
99 84 98 imbitrrid ( 𝑋 = 1 → ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
100 61 99 jaoi ( ( 𝑋 = 0 ∨ 𝑋 = 1 ) → ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
101 6 100 syl ( 𝑋 ∈ { 0 , 1 } → ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
102 elpri ( 𝑋 ∈ { 2 , 3 } → ( 𝑋 = 2 ∨ 𝑋 = 3 ) )
103 63 11 opelxpd ( 𝑁 ∈ ( ℤ ‘ 3 ) → ⟨ 1 , 0 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) )
104 64 103 jca ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( ⟨ 1 , 1 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ⟨ 1 , 0 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ) )
105 104 adantr ( ( 𝑁 ∈ ( ℤ ‘ 3 ) ∧ 𝑋 = 2 ) → ( ⟨ 1 , 1 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ⟨ 1 , 0 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ) )
106 prelpwi ( ( ⟨ 1 , 1 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ⟨ 1 , 0 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ) → { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) )
107 105 106 syl ( ( 𝑁 ∈ ( ℤ ‘ 3 ) ∧ 𝑋 = 2 ) → { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) )
108 27 eqeq2d ( 𝑥 = 0 → ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 0 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ) )
109 30 eqeq2d ( 𝑥 = 0 → ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ↔ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 1 , 0 ⟩ } ) )
110 33 eqeq2d ( 𝑥 = 0 → ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 0 ⟩ , ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ) )
111 108 109 110 3orbi123d ( 𝑥 = 0 → ( ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ↔ ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 0 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 1 , 0 ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 0 ⟩ , ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ) ) )
112 prcom { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 0 ⟩ , ⟨ 1 , 1 ⟩ }
113 41 opeq2d ( 𝑁 ∈ ( ℤ ‘ 3 ) → ⟨ 1 , 1 ⟩ = ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ )
114 113 preq2d ( 𝑁 ∈ ( ℤ ‘ 3 ) → { ⟨ 1 , 0 ⟩ , ⟨ 1 , 1 ⟩ } = { ⟨ 1 , 0 ⟩ , ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } )
115 112 114 eqtrid ( 𝑁 ∈ ( ℤ ‘ 3 ) → { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 0 ⟩ , ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } )
116 115 3mix3d ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 0 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 1 , 0 ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 0 ⟩ , ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ) )
117 111 11 116 rspcedvdw ( 𝑁 ∈ ( ℤ ‘ 3 ) → ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) )
118 117 adantr ( ( 𝑁 ∈ ( ℤ ‘ 3 ) ∧ 𝑋 = 2 ) → ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) )
119 107 118 jca ( ( 𝑁 ∈ ( ℤ ‘ 3 ) ∧ 𝑋 = 2 ) → ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )
120 fveq2 ( 𝑋 = 2 → ( 𝐹𝑋 ) = ( 𝐹 ‘ 2 ) )
121 1 fveq1i ( 𝐹 ‘ 2 ) = ( ⟨“ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ”⟩ ‘ 2 )
122 prex { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } ∈ V
123 s4fv2 ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } ∈ V → ( ⟨“ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ”⟩ ‘ 2 ) = { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } )
124 122 123 ax-mp ( ⟨“ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ”⟩ ‘ 2 ) = { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ }
125 121 124 eqtri ( 𝐹 ‘ 2 ) = { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ }
126 120 125 eqtrdi ( 𝑋 = 2 → ( 𝐹𝑋 ) = { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } )
127 126 eleq1d ( 𝑋 = 2 → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ↔ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ) )
128 126 eqeq1d ( 𝑋 = 2 → ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) )
129 126 eqeq1d ( 𝑋 = 2 → ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ↔ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ) )
130 126 eqeq1d ( 𝑋 = 2 → ( ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) )
131 128 129 130 3orbi123d ( 𝑋 = 2 → ( ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ↔ ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )
132 131 rexbidv ( 𝑋 = 2 → ( ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ↔ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )
133 127 132 anbi12d ( 𝑋 = 2 → ( ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ↔ ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
134 133 adantl ( ( 𝑁 ∈ ( ℤ ‘ 3 ) ∧ 𝑋 = 2 ) → ( ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ↔ ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
135 119 134 mpbird ( ( 𝑁 ∈ ( ℤ ‘ 3 ) ∧ 𝑋 = 2 ) → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )
136 135 expcom ( 𝑋 = 2 → ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
137 prelpwi ( ( ⟨ 1 , 0 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ⟨ 0 , 0 ⟩ ∈ ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ) → { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) )
138 103 12 137 syl2anc ( 𝑁 ∈ ( ℤ ‘ 3 ) → { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) )
139 27 eqeq2d ( 𝑥 = 0 → ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 0 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ) )
140 30 eqeq2d ( 𝑥 = 0 → ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ↔ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 1 , 0 ⟩ } ) )
141 33 eqeq2d ( 𝑥 = 0 → ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 1 , 0 ⟩ , ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ) )
142 139 140 141 3orbi123d ( 𝑥 = 0 → ( ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ↔ ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 0 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 1 , 0 ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 1 , 0 ⟩ , ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ) ) )
143 prcom { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 1 , 0 ⟩ }
144 143 3mix2i ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 0 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 1 , 0 ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 1 , 0 ⟩ , ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } )
145 144 a1i ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 0 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 0 ⟩ , ⟨ 1 , 0 ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 1 , 0 ⟩ , ⟨ 1 , ( ( 0 + 1 ) mod 𝑁 ) ⟩ } ) )
146 142 11 145 rspcedvdw ( 𝑁 ∈ ( ℤ ‘ 3 ) → ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) )
147 138 146 jca ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )
148 fveq2 ( 𝑋 = 3 → ( 𝐹𝑋 ) = ( 𝐹 ‘ 3 ) )
149 1 fveq1i ( 𝐹 ‘ 3 ) = ( ⟨“ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ”⟩ ‘ 3 )
150 prex { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ∈ V
151 s4fv3 ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ∈ V → ( ⟨“ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ”⟩ ‘ 3 ) = { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } )
152 150 151 ax-mp ( ⟨“ { ⟨ 0 , 0 ⟩ , ⟨ 0 , 1 ⟩ } { ⟨ 0 , 1 ⟩ , ⟨ 1 , 1 ⟩ } { ⟨ 1 , 1 ⟩ , ⟨ 1 , 0 ⟩ } { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ”⟩ ‘ 3 ) = { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ }
153 149 152 eqtri ( 𝐹 ‘ 3 ) = { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ }
154 148 153 eqtrdi ( 𝑋 = 3 → ( 𝐹𝑋 ) = { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } )
155 154 eleq1d ( 𝑋 = 3 → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ↔ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ) )
156 154 eqeq1d ( 𝑋 = 3 → ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) )
157 154 eqeq1d ( 𝑋 = 3 → ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ↔ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ) )
158 154 eqeq1d ( 𝑋 = 3 → ( ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ↔ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) )
159 156 157 158 3orbi123d ( 𝑋 = 3 → ( ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ↔ ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )
160 159 rexbidv ( 𝑋 = 3 → ( ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ↔ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )
161 155 160 anbi12d ( 𝑋 = 3 → ( ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ↔ ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ { ⟨ 1 , 0 ⟩ , ⟨ 0 , 0 ⟩ } = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
162 147 161 imbitrrid ( 𝑋 = 3 → ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
163 136 162 jaoi ( ( 𝑋 = 2 ∨ 𝑋 = 3 ) → ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
164 102 163 syl ( 𝑋 ∈ { 2 , 3 } → ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
165 101 164 jaoi ( ( 𝑋 ∈ { 0 , 1 } ∨ 𝑋 ∈ { 2 , 3 } ) → ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
166 5 165 sylbi ( 𝑋 ∈ ( 0 ..^ 4 ) → ( 𝑁 ∈ ( ℤ ‘ 3 ) → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) ) )
167 166 impcom ( ( 𝑁 ∈ ( ℤ ‘ 3 ) ∧ 𝑋 ∈ ( 0 ..^ 4 ) ) → ( ( 𝐹𝑋 ) ∈ 𝒫 ( { 0 , 1 } × ( 0 ..^ 𝑁 ) ) ∧ ∃ 𝑥 ∈ ( 0 ..^ 𝑁 ) ( ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 0 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 0 , 𝑥 ⟩ , ⟨ 1 , 𝑥 ⟩ } ∨ ( 𝐹𝑋 ) = { ⟨ 1 , 𝑥 ⟩ , ⟨ 1 , ( ( 𝑥 + 1 ) mod 𝑁 ) ⟩ } ) ) )