Metamath Proof Explorer


Theorem gdlopcfv3

Description: The value of the combined Gödel operations function when its first argument is 3. (Contributed by BTernaryTau, 19-Oct-2026)

Ref Expression
Hypotheses gdlopcfv3.1 ⊢ φ → A ∈ V
gdlopcfv3.2 ⊢ φ → B ∈ W
Assertion gdlopcfv3 Could not format assertion : No typesetting found for |- ( ph -> ( ~F ` <. 3o , A , B >. ) = ( A \ B ) ) with typecode |-

Proof

Step Hyp Ref Expression
1 gdlopcfv3.1 ⊢ φ → A ∈ V
2 gdlopcfv3.2 ⊢ φ → B ∈ W
3 3olt9o Could not format 3o e. 9o : No typesetting found for |- 3o e. 9o with typecode |-
4 df-3o ⊢ 3 𝑜 = suc ⁡ 2 𝑜
5 3 4 suceldifsn0 Could not format 3o e. ( 9o \ { (/) } ) : No typesetting found for |- 3o e. ( 9o \ { (/) } ) with typecode |-
6 5 a1i Could not format ( ph -> 3o e. ( 9o \ { (/) } ) ) : No typesetting found for |- ( ph -> 3o e. ( 9o \ { (/) } ) ) with typecode |-
7 1 elexd ⊢ φ → A ∈ V
8 2 elexd ⊢ φ → B ∈ V
9 fvexd Could not format ( ph -> ( ~F3 ` <. A , B >. ) e. _V ) : No typesetting found for |- ( ph -> ( ~F3 ` <. A , B >. ) e. _V ) with typecode |-
10 1on ⊢ 1 𝑜 ∈ On
11 3on ⊢ 3 𝑜 ∈ On
12 df-2o ⊢ 2 𝑜 = suc ⁡ 1 𝑜
13 10 12 eqsucidi ⊢ 1 𝑜 ∈ 2 𝑜
14 2on ⊢ 2 𝑜 ∈ On
15 14 4 eqsucidi ⊢ 2 𝑜 ∈ 3 𝑜
16 11 13 15 ontr1i ⊢ 1 𝑜 ∈ 3 𝑜
17 10 11 16 gdlopcfvlem Could not format ( ( ph /\ 3o = n ) -> if ( n = 1o , ( ~F1 ` <. x , y >. ) , if ( n = 2o , ( ~F2 ` <. x , y >. ) , if ( n = 3o , ( ~F3 ` <. x , y >. ) , if ( n = 4o , ( ~F4 ` <. x , y >. ) , if ( n = 5o , ( ~F5 ` <. x , y >. ) , if ( n = 6o , ( ~F6 ` <. x , y >. ) , if ( n = 7o , ( ~F7 ` <. x , y >. ) , ( ~F8 ` <. x , y >. ) ) ) ) ) ) ) ) = if ( n = 2o , ( ~F2 ` <. x , y >. ) , if ( n = 3o , ( ~F3 ` <. x , y >. ) , if ( n = 4o , ( ~F4 ` <. x , y >. ) , if ( n = 5o , ( ~F5 ` <. x , y >. ) , if ( n = 6o , ( ~F6 ` <. x , y >. ) , if ( n = 7o , ( ~F7 ` <. x , y >. ) , ( ~F8 ` <. x , y >. ) ) ) ) ) ) ) ) : No typesetting found for |- ( ( ph /\ 3o = n ) -> if ( n = 1o , ( ~F1 ` <. x , y >. ) , if ( n = 2o , ( ~F2 ` <. x , y >. ) , if ( n = 3o , ( ~F3 ` <. x , y >. ) , if ( n = 4o , ( ~F4 ` <. x , y >. ) , if ( n = 5o , ( ~F5 ` <. x , y >. ) , if ( n = 6o , ( ~F6 ` <. x , y >. ) , if ( n = 7o , ( ~F7 ` <. x , y >. ) , ( ~F8 ` <. x , y >. ) ) ) ) ) ) ) ) = if ( n = 2o , ( ~F2 ` <. x , y >. ) , if ( n = 3o , ( ~F3 ` <. x , y >. ) , if ( n = 4o , ( ~F4 ` <. x , y >. ) , if ( n = 5o , ( ~F5 ` <. x , y >. ) , if ( n = 6o , ( ~F6 ` <. x , y >. ) , if ( n = 7o , ( ~F7 ` <. x , y >. ) , ( ~F8 ` <. x , y >. ) ) ) ) ) ) ) ) with typecode |-
18 14 11 15 gdlopcfvlem Could not format ( ( ph /\ 3o = n ) -> if ( n = 2o , ( ~F2 ` <. x , y >. ) , if ( n = 3o , ( ~F3 ` <. x , y >. ) , if ( n = 4o , ( ~F4 ` <. x , y >. ) , if ( n = 5o , ( ~F5 ` <. x , y >. ) , if ( n = 6o , ( ~F6 ` <. x , y >. ) , if ( n = 7o , ( ~F7 ` <. x , y >. ) , ( ~F8 ` <. x , y >. ) ) ) ) ) ) ) = if ( n = 3o , ( ~F3 ` <. x , y >. ) , if ( n = 4o , ( ~F4 ` <. x , y >. ) , if ( n = 5o , ( ~F5 ` <. x , y >. ) , if ( n = 6o , ( ~F6 ` <. x , y >. ) , if ( n = 7o , ( ~F7 ` <. x , y >. ) , ( ~F8 ` <. x , y >. ) ) ) ) ) ) ) : No typesetting found for |- ( ( ph /\ 3o = n ) -> if ( n = 2o , ( ~F2 ` <. x , y >. ) , if ( n = 3o , ( ~F3 ` <. x , y >. ) , if ( n = 4o , ( ~F4 ` <. x , y >. ) , if ( n = 5o , ( ~F5 ` <. x , y >. ) , if ( n = 6o , ( ~F6 ` <. x , y >. ) , if ( n = 7o , ( ~F7 ` <. x , y >. ) , ( ~F8 ` <. x , y >. ) ) ) ) ) ) ) = if ( n = 3o , ( ~F3 ` <. x , y >. ) , if ( n = 4o , ( ~F4 ` <. x , y >. ) , if ( n = 5o , ( ~F5 ` <. x , y >. ) , if ( n = 6o , ( ~F6 ` <. x , y >. ) , if ( n = 7o , ( ~F7 ` <. x , y >. ) , ( ~F8 ` <. x , y >. ) ) ) ) ) ) ) with typecode |-
19 eqcom ⊢ 3 𝑜 = n ↔ n = 3 𝑜
20 19 bilani ⊢ φ ∧ 3 𝑜 = n → n = 3 𝑜
21 20 iftrued Could not format ( ( ph /\ 3o = n ) -> if ( n = 3o , ( ~F3 ` <. x , y >. ) , if ( n = 4o , ( ~F4 ` <. x , y >. ) , if ( n = 5o , ( ~F5 ` <. x , y >. ) , if ( n = 6o , ( ~F6 ` <. x , y >. ) , if ( n = 7o , ( ~F7 ` <. x , y >. ) , ( ~F8 ` <. x , y >. ) ) ) ) ) ) = ( ~F3 ` <. x , y >. ) ) : No typesetting found for |- ( ( ph /\ 3o = n ) -> if ( n = 3o , ( ~F3 ` <. x , y >. ) , if ( n = 4o , ( ~F4 ` <. x , y >. ) , if ( n = 5o , ( ~F5 ` <. x , y >. ) , if ( n = 6o , ( ~F6 ` <. x , y >. ) , if ( n = 7o , ( ~F7 ` <. x , y >. ) , ( ~F8 ` <. x , y >. ) ) ) ) ) ) = ( ~F3 ` <. x , y >. ) ) with typecode |-
22 17 18 21 3eqtrrd Could not format ( ( ph /\ 3o = n ) -> ( ~F3 ` <. x , y >. ) = if ( n = 1o , ( ~F1 ` <. x , y >. ) , if ( n = 2o , ( ~F2 ` <. x , y >. ) , if ( n = 3o , ( ~F3 ` <. x , y >. ) , if ( n = 4o , ( ~F4 ` <. x , y >. ) , if ( n = 5o , ( ~F5 ` <. x , y >. ) , if ( n = 6o , ( ~F6 ` <. x , y >. ) , if ( n = 7o , ( ~F7 ` <. x , y >. ) , ( ~F8 ` <. x , y >. ) ) ) ) ) ) ) ) ) : No typesetting found for |- ( ( ph /\ 3o = n ) -> ( ~F3 ` <. x , y >. ) = if ( n = 1o , ( ~F1 ` <. x , y >. ) , if ( n = 2o , ( ~F2 ` <. x , y >. ) , if ( n = 3o , ( ~F3 ` <. x , y >. ) , if ( n = 4o , ( ~F4 ` <. x , y >. ) , if ( n = 5o , ( ~F5 ` <. x , y >. ) , if ( n = 6o , ( ~F6 ` <. x , y >. ) , if ( n = 7o , ( ~F7 ` <. x , y >. ) , ( ~F8 ` <. x , y >. ) ) ) ) ) ) ) ) ) with typecode |-
23 opeq1 ⊢ A = x → A y = x y
24 23 fveq2d Could not format ( A = x -> ( ~F3 ` <. A , y >. ) = ( ~F3 ` <. x , y >. ) ) : No typesetting found for |- ( A = x -> ( ~F3 ` <. A , y >. ) = ( ~F3 ` <. x , y >. ) ) with typecode |-
25 24 adantl Could not format ( ( ph /\ A = x ) -> ( ~F3 ` <. A , y >. ) = ( ~F3 ` <. x , y >. ) ) : No typesetting found for |- ( ( ph /\ A = x ) -> ( ~F3 ` <. A , y >. ) = ( ~F3 ` <. x , y >. ) ) with typecode |-
26 opeq2 ⊢ B = y → A B = A y
27 26 fveq2d Could not format ( B = y -> ( ~F3 ` <. A , B >. ) = ( ~F3 ` <. A , y >. ) ) : No typesetting found for |- ( B = y -> ( ~F3 ` <. A , B >. ) = ( ~F3 ` <. A , y >. ) ) with typecode |-
28 27 adantl Could not format ( ( ph /\ B = y ) -> ( ~F3 ` <. A , B >. ) = ( ~F3 ` <. A , y >. ) ) : No typesetting found for |- ( ( ph /\ B = y ) -> ( ~F3 ` <. A , B >. ) = ( ~F3 ` <. A , y >. ) ) with typecode |-
29 df-gdlopc Could not format ~F = ( n e. ( 9o \ { (/) } ) , x e. _V , y e. _V |-> if ( n = 1o , ( ~F1 ` <. x , y >. ) , if ( n = 2o , ( ~F2 ` <. x , y >. ) , if ( n = 3o , ( ~F3 ` <. x , y >. ) , if ( n = 4o , ( ~F4 ` <. x , y >. ) , if ( n = 5o , ( ~F5 ` <. x , y >. ) , if ( n = 6o , ( ~F6 ` <. x , y >. ) , if ( n = 7o , ( ~F7 ` <. x , y >. ) , ( ~F8 ` <. x , y >. ) ) ) ) ) ) ) ) ) : No typesetting found for |- ~F = ( n e. ( 9o \ { (/) } ) , x e. _V , y e. _V |-> if ( n = 1o , ( ~F1 ` <. x , y >. ) , if ( n = 2o , ( ~F2 ` <. x , y >. ) , if ( n = 3o , ( ~F3 ` <. x , y >. ) , if ( n = 4o , ( ~F4 ` <. x , y >. ) , if ( n = 5o , ( ~F5 ` <. x , y >. ) , if ( n = 6o , ( ~F6 ` <. x , y >. ) , if ( n = 7o , ( ~F7 ` <. x , y >. ) , ( ~F8 ` <. x , y >. ) ) ) ) ) ) ) ) ) with typecode |-
30 6 7 8 9 22 25 28 29 mpt3fvot2d Could not format ( ph -> ( ~F ` <. 3o , A , B >. ) = ( ~F3 ` <. A , B >. ) ) : No typesetting found for |- ( ph -> ( ~F ` <. 3o , A , B >. ) = ( ~F3 ` <. A , B >. ) ) with typecode |-
31 1 2 gdlop3fv Could not format ( ph -> ( ~F3 ` <. A , B >. ) = ( A \ B ) ) : No typesetting found for |- ( ph -> ( ~F3 ` <. A , B >. ) = ( A \ B ) ) with typecode |-
32 30 31 eqtrd Could not format ( ph -> ( ~F ` <. 3o , A , B >. ) = ( A \ B ) ) : No typesetting found for |- ( ph -> ( ~F ` <. 3o , A , B >. ) = ( A \ B ) ) with typecode |-