Metamath Proof Explorer


Theorem satfvsuc

Description: The value of the satisfaction predicate as function over wff codes at a successor. (Contributed by AV, 10-Oct-2023)

Ref Expression
Hypothesis satfv0.s S = M Sat E
Assertion satfvsuc M V E W N ω S suc N = S N x y | u S N v S N x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u

Proof

Step Hyp Ref Expression
1 satfv0.s S = M Sat E
2 peano2 N ω suc N ω
3 elelsuc suc N ω suc N suc ω
4 2 3 syl N ω suc N suc ω
5 1 satfvsucom M V E W suc N suc ω S suc N = rec f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u x y | i ω j ω x = i 𝑔 j y = a M ω | a i E a j suc N
6 4 5 syl3an3 M V E W N ω S suc N = rec f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u x y | i ω j ω x = i 𝑔 j y = a M ω | a i E a j suc N
7 nnon N ω N On
8 7 3ad2ant3 M V E W N ω N On
9 rdgsuc N On rec f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u x y | i ω j ω x = i 𝑔 j y = a M ω | a i E a j suc N = f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u rec f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u x y | i ω j ω x = i 𝑔 j y = a M ω | a i E a j N
10 8 9 syl M V E W N ω rec f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u x y | i ω j ω x = i 𝑔 j y = a M ω | a i E a j suc N = f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u rec f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u x y | i ω j ω x = i 𝑔 j y = a M ω | a i E a j N
11 elelsuc N ω N suc ω
12 1 satfvsucom M V E W N suc ω S N = rec f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u x y | i ω j ω x = i 𝑔 j y = a M ω | a i E a j N
13 11 12 syl3an3 M V E W N ω S N = rec f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u x y | i ω j ω x = i 𝑔 j y = a M ω | a i E a j N
14 13 eqcomd M V E W N ω rec f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u x y | i ω j ω x = i 𝑔 j y = a M ω | a i E a j N = S N
15 14 fveq2d M V E W N ω f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u rec f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u x y | i ω j ω x = i 𝑔 j y = a M ω | a i E a j N = f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u S N
16 eqid f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u = f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u
17 id f = S N f = S N
18 rexeq f = S N v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v v S N x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v
19 18 orbi1d f = S N v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u v S N x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u
20 19 rexeqbi1dv f = S N u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u u S N v S N x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u
21 20 opabbidv f = S N x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u = x y | u S N v S N x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u
22 17 21 uneq12d f = S N f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u = S N x y | u S N v S N x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u
23 fvexd M V E W N ω S N V
24 1 satfvsuclem2 M V E W N ω x y | u S N v S N x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u V
25 unexg S N V x y | u S N v S N x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u V S N x y | u S N v S N x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u V
26 23 24 25 syl2anc M V E W N ω S N x y | u S N v S N x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u V
27 16 22 23 26 fvmptd3 M V E W N ω f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u S N = S N x y | u S N v S N x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u
28 15 27 eqtrd M V E W N ω f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u rec f V f x y | u f v f x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u x y | i ω j ω x = i 𝑔 j y = a M ω | a i E a j N = S N x y | u S N v S N x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u
29 6 10 28 3eqtrd M V E W N ω S suc N = S N x y | u S N v S N x = 1 st u 𝑔 1 st v y = M ω 2 nd u 2 nd v i ω x = 𝑔 i 1 st u y = a M ω | z M i z a ω i 2 nd u