P. 357 of Theorem List - Metamath Proof Explorer

Theorem List for Metamath Proof Explorer - 35601-35700   *Has distinct variable group(s)

Type	Label	Description
Statement
Theorem	mclsax 35601*	The closure is closed under axiom application. (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝐷 = (mDV‘𝑇)    &   ⊢ 𝐸 = (mEx‘𝑇)    &   ⊢ 𝐶 = (mCls‘𝑇)    &   ⊢ (𝜑 → 𝑇 ∈ mFS)    &   ⊢ (𝜑 → 𝐾 ⊆ 𝐷)    &   ⊢ (𝜑 → 𝐵 ⊆ 𝐸)    &   ⊢ 𝐴 = (mAx‘𝑇)    &   ⊢ 𝐿 = (mSubst‘𝑇)    &   ⊢ 𝑉 = (mVR‘𝑇)    &   ⊢ 𝐻 = (mVH‘𝑇)    &   ⊢ 𝑊 = (mVars‘𝑇)    &   ⊢ (𝜑 → ⟨𝑀, 𝑂, 𝑃⟩ ∈ 𝐴)    &   ⊢ (𝜑 → 𝑆 ∈ ran 𝐿)    &   ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑂) → (𝑆‘𝑥) ∈ (𝐾𝐶𝐵))    &   ⊢ ((𝜑 ∧ 𝑣 ∈ 𝑉) → (𝑆‘(𝐻‘𝑣)) ∈ (𝐾𝐶𝐵))    &   ⊢ ((𝜑 ∧ (𝑥𝑀𝑦 ∧ 𝑎 ∈ (𝑊‘(𝑆‘(𝐻‘𝑥))) ∧ 𝑏 ∈ (𝑊‘(𝑆‘(𝐻‘𝑦))))) → 𝑎𝐾𝑏)    ⇒   ⊢ (𝜑 → (𝑆‘𝑃) ∈ (𝐾𝐶𝐵))
Theorem	mclsind 35602*	Induction theorem for closure: any other set 𝑄 closed under the axioms and the hypotheses contains all the elements of the closure. (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝐷 = (mDV‘𝑇)    &   ⊢ 𝐸 = (mEx‘𝑇)    &   ⊢ 𝐶 = (mCls‘𝑇)    &   ⊢ (𝜑 → 𝑇 ∈ mFS)    &   ⊢ (𝜑 → 𝐾 ⊆ 𝐷)    &   ⊢ (𝜑 → 𝐵 ⊆ 𝐸)    &   ⊢ 𝐴 = (mAx‘𝑇)    &   ⊢ 𝐿 = (mSubst‘𝑇)    &   ⊢ 𝑉 = (mVR‘𝑇)    &   ⊢ 𝐻 = (mVH‘𝑇)    &   ⊢ 𝑊 = (mVars‘𝑇)    &   ⊢ (𝜑 → 𝐵 ⊆ 𝑄)    &   ⊢ ((𝜑 ∧ 𝑣 ∈ 𝑉) → (𝐻‘𝑣) ∈ 𝑄)    &   ⊢ ((𝜑 ∧ (⟨𝑚, 𝑜, 𝑝⟩ ∈ 𝐴 ∧ 𝑠 ∈ ran 𝐿 ∧ (𝑠 “ (𝑜 ∪ ran 𝐻)) ⊆ 𝑄) ∧ ∀𝑥∀𝑦(𝑥𝑚𝑦 → ((𝑊‘(𝑠‘(𝐻‘𝑥))) × (𝑊‘(𝑠‘(𝐻‘𝑦)))) ⊆ 𝐾)) → (𝑠‘𝑝) ∈ 𝑄)    ⇒   ⊢ (𝜑 → (𝐾𝐶𝐵) ⊆ 𝑄)
Theorem	mppspstlem 35603*	Lemma for mppspst 35606. (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝑃 = (mPreSt‘𝑇)    &   ⊢ 𝐽 = (mPPSt‘𝑇)    &   ⊢ 𝐶 = (mCls‘𝑇)    ⇒   ⊢ {⟨⟨𝑑, ℎ⟩, 𝑎⟩ ∣ (⟨𝑑, ℎ, 𝑎⟩ ∈ 𝑃 ∧ 𝑎 ∈ (𝑑𝐶ℎ))} ⊆ 𝑃
Theorem	mppsval 35604*	Definition of a provable pre-statement, essentially just a reorganization of the arguments of df-mcls . (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝑃 = (mPreSt‘𝑇)    &   ⊢ 𝐽 = (mPPSt‘𝑇)    &   ⊢ 𝐶 = (mCls‘𝑇)    ⇒   ⊢ 𝐽 = {⟨⟨𝑑, ℎ⟩, 𝑎⟩ ∣ (⟨𝑑, ℎ, 𝑎⟩ ∈ 𝑃 ∧ 𝑎 ∈ (𝑑𝐶ℎ))}
Theorem	elmpps 35605	Definition of a provable pre-statement, essentially just a reorganization of the arguments of df-mcls . (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝑃 = (mPreSt‘𝑇)    &   ⊢ 𝐽 = (mPPSt‘𝑇)    &   ⊢ 𝐶 = (mCls‘𝑇)    ⇒   ⊢ (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝐽 ↔ (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 ∧ 𝐴 ∈ (𝐷𝐶𝐻)))
Theorem	mppspst 35606	A provable pre-statement is a pre-statement. (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝑃 = (mPreSt‘𝑇)    &   ⊢ 𝐽 = (mPPSt‘𝑇)    ⇒   ⊢ 𝐽 ⊆ 𝑃
Theorem	mthmval 35607	A theorem is a pre-statement, whose reduct is also the reduct of a provable pre-statement. Unlike the difference between pre-statement and statement, this application of the reduct is not necessarily trivial: there are theorems that are not themselves provable but are provable once enough "dummy variables" are introduced. (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝑅 = (mStRed‘𝑇)    &   ⊢ 𝐽 = (mPPSt‘𝑇)    &   ⊢ 𝑈 = (mThm‘𝑇)    ⇒   ⊢ 𝑈 = (◡𝑅 “ (𝑅 “ 𝐽))
Theorem	elmthm 35608*	A theorem is a pre-statement, whose reduct is also the reduct of a provable pre-statement. (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝑅 = (mStRed‘𝑇)    &   ⊢ 𝐽 = (mPPSt‘𝑇)    &   ⊢ 𝑈 = (mThm‘𝑇)    ⇒   ⊢ (𝑋 ∈ 𝑈 ↔ ∃𝑥 ∈ 𝐽 (𝑅‘𝑥) = (𝑅‘𝑋))
Theorem	mthmi 35609	A statement whose reduct is the reduct of a provable pre-statement is a theorem. (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝑅 = (mStRed‘𝑇)    &   ⊢ 𝐽 = (mPPSt‘𝑇)    &   ⊢ 𝑈 = (mThm‘𝑇)    ⇒   ⊢ ((𝑋 ∈ 𝐽 ∧ (𝑅‘𝑋) = (𝑅‘𝑌)) → 𝑌 ∈ 𝑈)
Theorem	mthmsta 35610	A theorem is a pre-statement. (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝑈 = (mThm‘𝑇)    &   ⊢ 𝑆 = (mPreSt‘𝑇)    ⇒   ⊢ 𝑈 ⊆ 𝑆
Theorem	mppsthm 35611	A provable pre-statement is a theorem. (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝐽 = (mPPSt‘𝑇)    &   ⊢ 𝑈 = (mThm‘𝑇)    ⇒   ⊢ 𝐽 ⊆ 𝑈
Theorem	mthmblem 35612	Lemma for mthmb 35613. (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝑅 = (mStRed‘𝑇)    &   ⊢ 𝑈 = (mThm‘𝑇)    ⇒   ⊢ ((𝑅‘𝑋) = (𝑅‘𝑌) → (𝑋 ∈ 𝑈 → 𝑌 ∈ 𝑈))
Theorem	mthmb 35613	If two statements have the same reduct then one is a theorem iff the other is. (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝑅 = (mStRed‘𝑇)    &   ⊢ 𝑈 = (mThm‘𝑇)    ⇒   ⊢ ((𝑅‘𝑋) = (𝑅‘𝑌) → (𝑋 ∈ 𝑈 ↔ 𝑌 ∈ 𝑈))
Theorem	mthmpps 35614	Given a theorem, there is an explicitly definable witnessing provable pre-statement for the provability of the theorem. (However, this pre-statement requires infinitely many disjoint variable conditions, which is sometimes inconvenient.) (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝑅 = (mStRed‘𝑇)    &   ⊢ 𝐽 = (mPPSt‘𝑇)    &   ⊢ 𝑈 = (mThm‘𝑇)    &   ⊢ 𝐷 = (mDV‘𝑇)    &   ⊢ 𝑉 = (mVars‘𝑇)    &   ⊢ 𝑍 = ∪ (𝑉 “ (𝐻 ∪ {𝐴}))    &   ⊢ 𝑀 = (𝐶 ∪ (𝐷 ∖ (𝑍 × 𝑍)))    ⇒   ⊢ (𝑇 ∈ mFS → (⟨𝐶, 𝐻, 𝐴⟩ ∈ 𝑈 ↔ (⟨𝑀, 𝐻, 𝐴⟩ ∈ 𝐽 ∧ (𝑅‘⟨𝑀, 𝐻, 𝐴⟩) = (𝑅‘⟨𝐶, 𝐻, 𝐴⟩))))
Theorem	mclsppslem 35615*	The closure is closed under application of provable pre-statements. (Compare mclsax 35601.) This theorem is what justifies the treatment of theorems as "equivalent" to axioms once they have been proven: the composition of one theorem in the proof of another yields a theorem. (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝐷 = (mDV‘𝑇)    &   ⊢ 𝐸 = (mEx‘𝑇)    &   ⊢ 𝐶 = (mCls‘𝑇)    &   ⊢ (𝜑 → 𝑇 ∈ mFS)    &   ⊢ (𝜑 → 𝐾 ⊆ 𝐷)    &   ⊢ (𝜑 → 𝐵 ⊆ 𝐸)    &   ⊢ 𝐽 = (mPPSt‘𝑇)    &   ⊢ 𝐿 = (mSubst‘𝑇)    &   ⊢ 𝑉 = (mVR‘𝑇)    &   ⊢ 𝐻 = (mVH‘𝑇)    &   ⊢ 𝑊 = (mVars‘𝑇)    &   ⊢ (𝜑 → ⟨𝑀, 𝑂, 𝑃⟩ ∈ 𝐽)    &   ⊢ (𝜑 → 𝑆 ∈ ran 𝐿)    &   ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑂) → (𝑆‘𝑥) ∈ (𝐾𝐶𝐵))    &   ⊢ ((𝜑 ∧ 𝑣 ∈ 𝑉) → (𝑆‘(𝐻‘𝑣)) ∈ (𝐾𝐶𝐵))    &   ⊢ ((𝜑 ∧ (𝑥𝑀𝑦 ∧ 𝑎 ∈ (𝑊‘(𝑆‘(𝐻‘𝑥))) ∧ 𝑏 ∈ (𝑊‘(𝑆‘(𝐻‘𝑦))))) → 𝑎𝐾𝑏)    &   ⊢ (𝜑 → ⟨𝑚, 𝑜, 𝑝⟩ ∈ (mAx‘𝑇))    &   ⊢ (𝜑 → 𝑠 ∈ ran 𝐿)    &   ⊢ (𝜑 → (𝑠 “ (𝑜 ∪ ran 𝐻)) ⊆ (◡𝑆 “ (𝐾𝐶𝐵)))    &   ⊢ (𝜑 → ∀𝑧∀𝑤(𝑧𝑚𝑤 → ((𝑊‘(𝑠‘(𝐻‘𝑧))) × (𝑊‘(𝑠‘(𝐻‘𝑤)))) ⊆ 𝑀))    ⇒   ⊢ (𝜑 → (𝑠‘𝑝) ∈ (◡𝑆 “ (𝐾𝐶𝐵)))
Theorem	mclspps 35616*	The closure is closed under application of provable pre-statements. (Compare mclsax 35601.) This theorem is what justifies the treatment of theorems as "equivalent" to axioms once they have been proven: the composition of one theorem in the proof of another yields a theorem. (Contributed by Mario Carneiro, 18-Jul-2016.)
⊢ 𝐷 = (mDV‘𝑇)    &   ⊢ 𝐸 = (mEx‘𝑇)    &   ⊢ 𝐶 = (mCls‘𝑇)    &   ⊢ (𝜑 → 𝑇 ∈ mFS)    &   ⊢ (𝜑 → 𝐾 ⊆ 𝐷)    &   ⊢ (𝜑 → 𝐵 ⊆ 𝐸)    &   ⊢ 𝐽 = (mPPSt‘𝑇)    &   ⊢ 𝐿 = (mSubst‘𝑇)    &   ⊢ 𝑉 = (mVR‘𝑇)    &   ⊢ 𝐻 = (mVH‘𝑇)    &   ⊢ 𝑊 = (mVars‘𝑇)    &   ⊢ (𝜑 → ⟨𝑀, 𝑂, 𝑃⟩ ∈ 𝐽)    &   ⊢ (𝜑 → 𝑆 ∈ ran 𝐿)    &   ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑂) → (𝑆‘𝑥) ∈ (𝐾𝐶𝐵))    &   ⊢ ((𝜑 ∧ 𝑣 ∈ 𝑉) → (𝑆‘(𝐻‘𝑣)) ∈ (𝐾𝐶𝐵))    &   ⊢ ((𝜑 ∧ (𝑥𝑀𝑦 ∧ 𝑎 ∈ (𝑊‘(𝑆‘(𝐻‘𝑥))) ∧ 𝑏 ∈ (𝑊‘(𝑆‘(𝐻‘𝑦))))) → 𝑎𝐾𝑏)    ⇒   ⊢ (𝜑 → (𝑆‘𝑃) ∈ (𝐾𝐶𝐵))
21.6.14  Grammatical formal systems
Syntax	cm0s 35617	Mapping expressions to statements.
class m0St
Syntax	cmsa 35618	The set of syntax axioms.
class mSA
Syntax	cmwgfs 35619	The set of weakly grammatical formal systems.
class mWGFS
Syntax	cmsy 35620	The syntax typecode function.
class mSyn
Syntax	cmesy 35621	The syntax typecode function for expressions.
class mESyn
Syntax	cmgfs 35622	The set of grammatical formal systems.
class mGFS
Syntax	cmtree 35623	The set of proof trees.
class mTree
Syntax	cmst 35624	The set of syntax trees.
class mST
Syntax	cmsax 35625	The indexing set for a syntax axiom.
class mSAX
Syntax	cmufs 35626	The set of unambiguous formal systems.
class mUFS
Definition	df-m0s 35627	Define a function mapping expressions to statements. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ m0St = (𝑎 ∈ V ↦ ⟨∅, ∅, 𝑎⟩)
Definition	df-msa 35628*	Define the set of syntax axioms. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mSA = (𝑡 ∈ V ↦ {𝑎 ∈ (mEx‘𝑡) ∣ ((m0St‘𝑎) ∈ (mAx‘𝑡) ∧ (1st ‘𝑎) ∈ (mVT‘𝑡) ∧ Fun (◡(2nd ‘𝑎) ↾ (mVR‘𝑡)))})
Definition	df-mwgfs 35629*	Define the set of weakly grammatical formal systems. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mWGFS = {𝑡 ∈ mFS ∣ ∀𝑑∀ℎ∀𝑎((⟨𝑑, ℎ, 𝑎⟩ ∈ (mAx‘𝑡) ∧ (1st ‘𝑎) ∈ (mVT‘𝑡)) → ∃𝑠 ∈ ran (mSubst‘𝑡)𝑎 ∈ (𝑠 “ (mSA‘𝑡)))}
Definition	df-msyn 35630	Define the syntax typecode function. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mSyn = Slot 6
Definition	df-mesyn 35631*	Define the syntax typecode function for expressions. (Contributed by Mario Carneiro, 12-Jun-2023.)
⊢ mESyn = (𝑡 ∈ V ↦ (𝑐 ∈ (mTC‘𝑡), 𝑒 ∈ (mREx‘𝑡) ↦ (((mSyn‘𝑡)‘𝑐)m0St𝑒)))
Definition	df-mgfs 35632*	Define the set of grammatical formal systems. (Contributed by Mario Carneiro, 12-Jun-2023.)
⊢ mGFS = {𝑡 ∈ mWGFS ∣ ((mSyn‘𝑡):(mTC‘𝑡)⟶(mVT‘𝑡) ∧ ∀𝑐 ∈ (mVT‘𝑡)((mSyn‘𝑡)‘𝑐) = 𝑐 ∧ ∀𝑑∀ℎ∀𝑎(⟨𝑑, ℎ, 𝑎⟩ ∈ (mAx‘𝑡) → ∀𝑒 ∈ (ℎ ∪ {𝑎})((mESyn‘𝑡)‘𝑒) ∈ (mPPSt‘𝑡)))}
Definition	df-mtree 35633*	Define the set of proof trees. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mTree = (𝑡 ∈ V ↦ (𝑑 ∈ 𝒫 (mDV‘𝑡), ℎ ∈ 𝒫 (mEx‘𝑡) ↦ ∩ {𝑟 ∣ (∀𝑒 ∈ ran (mVH‘𝑡)𝑒𝑟⟨(m0St‘𝑒), ∅⟩ ∧ ∀𝑒 ∈ ℎ 𝑒𝑟⟨((mStRed‘𝑡)‘⟨𝑑, ℎ, 𝑒⟩), ∅⟩ ∧ ∀𝑚∀𝑜∀𝑝(⟨𝑚, 𝑜, 𝑝⟩ ∈ (mAx‘𝑡) → ∀𝑠 ∈ ran (mSubst‘𝑡)(∀𝑥∀𝑦(𝑥𝑚𝑦 → (((mVars‘𝑡)‘(𝑠‘((mVH‘𝑡)‘𝑥))) × ((mVars‘𝑡)‘(𝑠‘((mVH‘𝑡)‘𝑦)))) ⊆ 𝑑) → ({(𝑠‘𝑝)} × X𝑒 ∈ (𝑜 ∪ ((mVH‘𝑡) “ ∪ ((mVars‘𝑡) “ (𝑜 ∪ {𝑝}))))(𝑟 “ {(𝑠‘𝑒)})) ⊆ 𝑟)))}))
Definition	df-mst 35634	Define the function mapping syntax expressions to syntax trees. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mST = (𝑡 ∈ V ↦ ((∅(mTree‘𝑡)∅) ↾ ((mEx‘𝑡) ↾ (mVT‘𝑡))))
Definition	df-msax 35635*	Define the indexing set for a syntax axiom's representation in a tree. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mSAX = (𝑡 ∈ V ↦ (𝑝 ∈ (mSA‘𝑡) ↦ ((mVH‘𝑡) “ ((mVars‘𝑡)‘𝑝))))
Definition	df-mufs 35636	Define the set of unambiguous formal systems. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mUFS = {𝑡 ∈ mGFS ∣ Fun (mST‘𝑡)}
21.6.15  Models of formal systems
Syntax	cmuv 35637	The universe of a model.
class mUV
Syntax	cmvl 35638	The set of valuations.
class mVL
Syntax	cmvsb 35639	Substitution for a valuation.
class mVSubst
Syntax	cmfsh 35640	The freshness relation of a model.
class mFresh
Syntax	cmfr 35641	The set of freshness relations.
class mFRel
Syntax	cmevl 35642	The evaluation function of a model.
class mEval
Syntax	cmdl 35643	The set of models.
class mMdl
Syntax	cusyn 35644	The syntax function applied to elements of the model.
class mUSyn
Syntax	cgmdl 35645	The set of models in a grammatical formal system.
class mGMdl
Syntax	cmitp 35646	The interpretation function of the model.
class mItp
Syntax	cmfitp 35647	The evaluation function derived from the interpretation.
class mFromItp
Definition	df-muv 35648	Define the universe of a model. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mUV = Slot 7
Definition	df-mfsh 35649	Define the freshness relation of a model. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mFresh = Slot ;19
Definition	df-mevl 35650	Define the evaluation function of a model. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mEval = Slot ;20
Definition	df-mvl 35651*	Define the set of valuations. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mVL = (𝑡 ∈ V ↦ X𝑣 ∈ (mVR‘𝑡)((mUV‘𝑡) “ {((mType‘𝑡)‘𝑣)}))
Definition	df-mvsb 35652*	Define substitution applied to a valuation. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mVSubst = (𝑡 ∈ V ↦ {⟨⟨𝑠, 𝑚⟩, 𝑥⟩ ∣ ((𝑠 ∈ ran (mSubst‘𝑡) ∧ 𝑚 ∈ (mVL‘𝑡)) ∧ ∀𝑣 ∈ (mVR‘𝑡)𝑚dom (mEval‘𝑡)(𝑠‘((mVH‘𝑡)‘𝑣)) ∧ 𝑥 = (𝑣 ∈ (mVR‘𝑡) ↦ (𝑚(mEval‘𝑡)(𝑠‘((mVH‘𝑡)‘𝑣)))))})
Definition	df-mfrel 35653*	Define the set of freshness relations. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mFRel = (𝑡 ∈ V ↦ {𝑟 ∈ 𝒫 ((mUV‘𝑡) × (mUV‘𝑡)) ∣ (◡𝑟 = 𝑟 ∧ ∀𝑐 ∈ (mVT‘𝑡)∀𝑤 ∈ (𝒫 (mUV‘𝑡) ∩ Fin)∃𝑣 ∈ ((mUV‘𝑡) “ {𝑐})𝑤 ⊆ (𝑟 “ {𝑣}))})
Definition	df-mdl 35654*	Define the set of models of a formal system. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mMdl = {𝑡 ∈ mFS ∣ [(mUV‘𝑡) / 𝑢][(mEx‘𝑡) / 𝑥][(mVL‘𝑡) / 𝑣][(mEval‘𝑡) / 𝑛][(mFresh‘𝑡) / 𝑓]((𝑢 ⊆ ((mTC‘𝑡) × V) ∧ 𝑓 ∈ (mFRel‘𝑡) ∧ 𝑛 ∈ (𝑢 ↑pm (𝑣 × (mEx‘𝑡)))) ∧ ∀𝑚 ∈ 𝑣 ((∀𝑒 ∈ 𝑥 (𝑛 “ {⟨𝑚, 𝑒⟩}) ⊆ (𝑢 “ {(1st ‘𝑒)}) ∧ ∀𝑦 ∈ (mVR‘𝑡)⟨𝑚, ((mVH‘𝑡)‘𝑦)⟩𝑛(𝑚‘𝑦) ∧ ∀𝑑∀ℎ∀𝑎(⟨𝑑, ℎ, 𝑎⟩ ∈ (mAx‘𝑡) → ((∀𝑦∀𝑧(𝑦𝑑𝑧 → (𝑚‘𝑦)𝑓(𝑚‘𝑧)) ∧ ℎ ⊆ (dom 𝑛 “ {𝑚})) → 𝑚dom 𝑛 𝑎))) ∧ (∀𝑠 ∈ ran (mSubst‘𝑡)∀𝑒 ∈ (mEx‘𝑡)∀𝑦(⟨𝑠, 𝑚⟩(mVSubst‘𝑡)𝑦 → (𝑛 “ {⟨𝑚, (𝑠‘𝑒)⟩}) = (𝑛 “ {⟨𝑦, 𝑒⟩})) ∧ ∀𝑝 ∈ 𝑣 ∀𝑒 ∈ 𝑥 ((𝑚 ↾ ((mVars‘𝑡)‘𝑒)) = (𝑝 ↾ ((mVars‘𝑡)‘𝑒)) → (𝑛 “ {⟨𝑚, 𝑒⟩}) = (𝑛 “ {⟨𝑝, 𝑒⟩})) ∧ ∀𝑦 ∈ 𝑢 ∀𝑒 ∈ 𝑥 ((𝑚 “ ((mVars‘𝑡)‘𝑒)) ⊆ (𝑓 “ {𝑦}) → (𝑛 “ {⟨𝑚, 𝑒⟩}) ⊆ (𝑓 “ {𝑦})))))}
Definition	df-musyn 35655*	Define the syntax typecode function for the model universe. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mUSyn = (𝑡 ∈ V ↦ (𝑣 ∈ (mUV‘𝑡) ↦ ⟨((mSyn‘𝑡)‘(1st ‘𝑣)), (2nd ‘𝑣)⟩))
Definition	df-gmdl 35656*	Define the set of models of a grammatical formal system. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mGMdl = {𝑡 ∈ (mGFS ∩ mMdl) ∣ (∀𝑐 ∈ (mTC‘𝑡)((mUV‘𝑡) “ {𝑐}) ⊆ ((mUV‘𝑡) “ {((mSyn‘𝑡)‘𝑐)}) ∧ ∀𝑣 ∈ (mUV‘𝑐)∀𝑤 ∈ (mUV‘𝑐)(𝑣(mFresh‘𝑡)𝑤 ↔ 𝑣(mFresh‘𝑡)((mUSyn‘𝑡)‘𝑤)) ∧ ∀𝑚 ∈ (mVL‘𝑡)∀𝑒 ∈ (mEx‘𝑡)((mEval‘𝑡) “ {⟨𝑚, 𝑒⟩}) = (((mEval‘𝑡) “ {⟨𝑚, ((mESyn‘𝑡)‘𝑒)⟩}) ∩ ((mUV‘𝑡) “ {(1st ‘𝑒)})))}
Definition	df-mitp 35657*	Define the interpretation function for a model. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mItp = (𝑡 ∈ V ↦ (𝑎 ∈ (mSA‘𝑡) ↦ (𝑔 ∈ X𝑖 ∈ ((mVars‘𝑡)‘𝑎)((mUV‘𝑡) “ {((mType‘𝑡)‘𝑖)}) ↦ (℩𝑥∃𝑚 ∈ (mVL‘𝑡)(𝑔 = (𝑚 ↾ ((mVars‘𝑡)‘𝑎)) ∧ 𝑥 = (𝑚(mEval‘𝑡)𝑎))))))
Definition	df-mfitp 35658*	Define a function that produces the evaluation function, given the interpretation function for a model. (Contributed by Mario Carneiro, 14-Jul-2016.)
⊢ mFromItp = (𝑡 ∈ V ↦ (𝑓 ∈ X𝑎 ∈ (mSA‘𝑡)(((mUV‘𝑡) “ {((1st ‘𝑡)‘𝑎)}) ↑m X𝑖 ∈ ((mVars‘𝑡)‘𝑎)((mUV‘𝑡) “ {((mType‘𝑡)‘𝑖)})) ↦ (℩𝑛 ∈ ((mUV‘𝑡) ↑pm ((mVL‘𝑡) × (mEx‘𝑡)))∀𝑚 ∈ (mVL‘𝑡)(∀𝑣 ∈ (mVR‘𝑡)⟨𝑚, ((mVH‘𝑡)‘𝑣)⟩𝑛(𝑚‘𝑣) ∧ ∀𝑒∀𝑎∀𝑔(𝑒(mST‘𝑡)⟨𝑎, 𝑔⟩ → ⟨𝑚, 𝑒⟩𝑛(𝑓‘(𝑖 ∈ ((mVars‘𝑡)‘𝑎) ↦ (𝑚𝑛(𝑔‘((mVH‘𝑡)‘𝑖)))))) ∧ ∀𝑒 ∈ (mEx‘𝑡)(𝑛 “ {⟨𝑚, 𝑒⟩}) = ((𝑛 “ {⟨𝑚, ((mESyn‘𝑡)‘𝑒)⟩}) ∩ ((mUV‘𝑡) “ {(1st ‘𝑒)}))))))
21.6.16  Splitting fields
Syntax	ccpms 35659	Completion of a metric space.
class cplMetSp
Syntax	chlb 35660	Embeddings for a direct limit.
class HomLimB
Syntax	chlim 35661	Direct limit structure.
class HomLim
Syntax	cpfl 35662	Polynomial extension field.
class polyFld
Syntax	csf1 35663	Splitting field for a single polynomial (auxiliary).
class splitFld1
Syntax	csf 35664	Splitting field for a finite set of polynomials.
class splitFld
Syntax	cpsl 35665	Splitting field for a sequence of polynomials.
class polySplitLim
Definition	df-cplmet 35666*	A function which completes the given metric space. (Contributed by Mario Carneiro, 2-Dec-2014.)
⊢ cplMetSp = (𝑤 ∈ V ↦ ⦋((𝑤 ↑s ℕ) ↾s (Cau‘(dist‘𝑤))) / 𝑟⦌⦋(Base‘𝑟) / 𝑣⦌⦋{⟨𝑓, 𝑔⟩ ∣ ({𝑓, 𝑔} ⊆ 𝑣 ∧ ∀𝑥 ∈ ℝ+ ∃𝑗 ∈ ℤ (𝑓 ↾ (ℤ≥‘𝑗)):(ℤ≥‘𝑗)⟶((𝑔‘𝑗)(ball‘(dist‘𝑤))𝑥))} / 𝑒⦌((𝑟 /s 𝑒) sSet {⟨(dist‘ndx), {⟨⟨𝑥, 𝑦⟩, 𝑧⟩ ∣ ∃𝑝 ∈ 𝑣 ∃𝑞 ∈ 𝑣 ((𝑥 = [𝑝]𝑒 ∧ 𝑦 = [𝑞]𝑒) ∧ (𝑝 ∘f (dist‘𝑟)𝑞) ⇝ 𝑧)}⟩}))
Definition	df-homlimb 35667*	The input to this function is a sequence (on ℕ) of homomorphisms 𝐹(𝑛):𝑅(𝑛)⟶𝑅(𝑛 + 1). The resulting structure is the direct limit of the direct system so defined. This function returns the pair ⟨𝑆, 𝐺⟩ where 𝑆 is the terminal object and 𝐺 is a sequence of functions such that 𝐺(𝑛):𝑅(𝑛)⟶𝑆 and 𝐺(𝑛) = 𝐹(𝑛) ∘ 𝐺(𝑛 + 1). (Contributed by Mario Carneiro, 2-Dec-2014.)
⊢ HomLimB = (𝑓 ∈ V ↦ ⦋∪ 𝑛 ∈ ℕ ({𝑛} × dom (𝑓‘𝑛)) / 𝑣⦌⦋∩ {𝑠 ∣ (𝑠 Er 𝑣 ∧ (𝑥 ∈ 𝑣 ↦ ⟨((1st ‘𝑥) + 1), ((𝑓‘(1st ‘𝑥))‘(2nd ‘𝑥))⟩) ⊆ 𝑠)} / 𝑒⦌⟨(𝑣 / 𝑒), (𝑛 ∈ ℕ ↦ (𝑥 ∈ dom (𝑓‘𝑛) ↦ [⟨𝑛, 𝑥⟩]𝑒))⟩)
Definition	df-homlim 35668*	The input to this function is a sequence (on ℕ) of structures 𝑅(𝑛) and homomorphisms 𝐹(𝑛):𝑅(𝑛)⟶𝑅(𝑛 + 1). The resulting structure is the direct limit of the direct system so defined, and maintains any structures that were present in the original objects. TODO: generalize to directed sets? (Contributed by Mario Carneiro, 2-Dec-2014.)
⊢ HomLim = (𝑟 ∈ V, 𝑓 ∈ V ↦ ⦋( HomLimB ‘𝑓) / 𝑒⦌⦋(1st ‘𝑒) / 𝑣⦌⦋(2nd ‘𝑒) / 𝑔⦌({⟨(Base‘ndx), 𝑣⟩, ⟨(+g‘ndx), ∪ 𝑛 ∈ ℕ ran (𝑥 ∈ dom (𝑔‘𝑛), 𝑦 ∈ dom (𝑔‘𝑛) ↦ ⟨⟨((𝑔‘𝑛)‘𝑥), ((𝑔‘𝑛)‘𝑦)⟩, ((𝑔‘𝑛)‘(𝑥(+g‘(𝑟‘𝑛))𝑦))⟩)⟩, ⟨(.r‘ndx), ∪ 𝑛 ∈ ℕ ran (𝑥 ∈ dom (𝑔‘𝑛), 𝑦 ∈ dom (𝑔‘𝑛) ↦ ⟨⟨((𝑔‘𝑛)‘𝑥), ((𝑔‘𝑛)‘𝑦)⟩, ((𝑔‘𝑛)‘(𝑥(.r‘(𝑟‘𝑛))𝑦))⟩)⟩} ∪ {⟨(TopOpen‘ndx), {𝑠 ∈ 𝒫 𝑣 ∣ ∀𝑛 ∈ ℕ (◡(𝑔‘𝑛) “ 𝑠) ∈ (TopOpen‘(𝑟‘𝑛))}⟩, ⟨(dist‘ndx), ∪ 𝑛 ∈ ℕ ran (𝑥 ∈ dom ((𝑔‘𝑛)‘𝑛), 𝑦 ∈ dom ((𝑔‘𝑛)‘𝑛) ↦ ⟨⟨((𝑔‘𝑛)‘𝑥), ((𝑔‘𝑛)‘𝑦)⟩, (𝑥(dist‘(𝑟‘𝑛))𝑦)⟩)⟩, ⟨(le‘ndx), ∪ 𝑛 ∈ ℕ (◡(𝑔‘𝑛) ∘ ((le‘(𝑟‘𝑛)) ∘ (𝑔‘𝑛)))⟩}))
Definition	df-plfl 35669*	Define the field extension that augments a field with the root of the given irreducible polynomial, and extends the norm if one exists and the extension is unique. (Contributed by Mario Carneiro, 2-Dec-2014.) (Revised by Thierry Arnoux and Steven Nguyen, 21-Jun-2025.)
⊢ polyFld = (𝑟 ∈ V, 𝑝 ∈ V ↦ ⦋(Poly1‘𝑟) / 𝑠⦌⦋((RSpan‘𝑠)‘{𝑝}) / 𝑖⦌⦋(𝑐 ∈ (Base‘𝑟) ↦ [(𝑐( ·𝑠 ‘𝑠)(1r‘𝑠))](𝑠 ~QG 𝑖)) / 𝑓⦌⟨⦋(𝑠 /s (𝑠 ~QG 𝑖)) / 𝑡⦌((𝑡 toNrmGrp (℩𝑛 ∈ (AbsVal‘𝑡)(𝑛 ∘ 𝑓) = (norm‘𝑟))) sSet ⟨(le‘ndx), ⦋(𝑧 ∈ (Base‘𝑡) ↦ (℩𝑞 ∈ 𝑧 (𝑞(rem1p‘𝑟)𝑝) = 𝑞)) / 𝑔⦌(◡𝑔 ∘ ((le‘𝑠) ∘ 𝑔))⟩), 𝑓⟩)
Theorem	rexxfr3d 35670*	Transfer existential quantification from a variable 𝑥 to another variable 𝑦 contained in expression 𝐴. (Contributed by SN, 20-Jun-2025.)
⊢ (𝑥 = 𝑋 → (𝜓 ↔ 𝜒))    &   ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↔ ∃𝑦 ∈ 𝐵 𝑥 = 𝑋))    &   ⊢ (𝜑 → 𝑋 ∈ 𝑉)    ⇒   ⊢ (𝜑 → (∃𝑥 ∈ 𝐴 𝜓 ↔ ∃𝑦 ∈ 𝐵 𝜒))
Theorem	rexxfr3dALT 35671*	Longer proof of rexxfr3d 35670 using ax-11 2160 instead of ax-12 2180, without the disjoint variable condition 𝐴𝑥𝑦. (Contributed by SN, 19-Jun-2025.) (Proof modification is discouraged.) (New usage is discouraged.)
⊢ (𝑥 = 𝑋 → (𝜓 ↔ 𝜒))    &   ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↔ ∃𝑦 ∈ 𝐵 𝑥 = 𝑋))    &   ⊢ (𝜑 → 𝑋 ∈ 𝑉)    ⇒   ⊢ (𝜑 → (∃𝑥 ∈ 𝐴 𝜓 ↔ ∃𝑦 ∈ 𝐵 𝜒))
Theorem	rspssbasd 35672	The span of a set of ring elements is a set of ring elements. (Contributed by SN, 19-Jun-2025.)
⊢ 𝐾 = (RSpan‘𝑅)    &   ⊢ 𝐵 = (Base‘𝑅)    &   ⊢ (𝜑 → 𝑅 ∈ Ring)    &   ⊢ (𝜑 → 𝐺 ⊆ 𝐵)    ⇒   ⊢ (𝜑 → (𝐾‘𝐺) ⊆ 𝐵)
Theorem	ellcsrspsn 35673*	Membership in a left coset in a quotient of a ring by the span of a singleton (that is, by the ideal generated by an element). This characterization comes from eqglact 19089 and elrspsn 21175. (Contributed by SN, 19-Jun-2025.)
⊢ 𝐵 = (Base‘𝑅)    &   ⊢ + = (+g‘𝑅)    &   ⊢ · = (.r‘𝑅)    &   ⊢ ∼ = (𝑅 ~QG 𝐼)    &   ⊢ 𝑈 = (𝑅 /s ∼ )    &   ⊢ 𝐼 = ((RSpan‘𝑅)‘{𝑀})    &   ⊢ (𝜑 → 𝑅 ∈ Ring)    &   ⊢ (𝜑 → 𝑀 ∈ 𝐵)    &   ⊢ (𝜑 → 𝑋 ∈ (Base‘𝑈))    ⇒   ⊢ (𝜑 → ∃𝑥 ∈ 𝐵 (𝑋 = [𝑥] ∼ ∧ 𝑋 = {𝑧 ∣ ∃𝑦 ∈ 𝐵 𝑧 = (𝑥 + (𝑦 · 𝑀))}))
Theorem	ply1divalg3 35674*	Uniqueness of polynomial remainder: convert the subtraction in ply1divalg2 26069 to addition. (Contributed by SN, 20-Jun-2025.)
⊢ 𝑃 = (Poly1‘𝑅)    &   ⊢ 𝐷 = (deg1‘𝑅)    &   ⊢ 𝐵 = (Base‘𝑃)    &   ⊢ + = (+g‘𝑃)    &   ⊢ ∙ = (.r‘𝑃)    &   ⊢ 𝐶 = (Unic1p‘𝑅)    &   ⊢ (𝜑 → 𝑅 ∈ Ring)    &   ⊢ (𝜑 → 𝐹 ∈ 𝐵)    &   ⊢ (𝜑 → 𝐺 ∈ 𝐶)    ⇒   ⊢ (𝜑 → ∃!𝑞 ∈ 𝐵 (𝐷‘(𝐹 + (𝑞 ∙ 𝐺))) < (𝐷‘𝐺))
Theorem	r1peuqusdeg1 35675*	Uniqueness of polynomial remainder in terms of a quotient structure in the sense of the right hand side of r1pid2 26092. (Contributed by SN, 21-Jun-2025.)
⊢ 𝑃 = (Poly1‘𝑅)    &   ⊢ 𝐼 = ((RSpan‘𝑃)‘{𝐹})    &   ⊢ 𝑇 = (𝑃 /s (𝑃 ~QG 𝐼))    &   ⊢ 𝑄 = (Base‘𝑇)    &   ⊢ 𝑁 = (Unic1p‘𝑅)    &   ⊢ 𝐷 = (deg1‘𝑅)    &   ⊢ (𝜑 → 𝑅 ∈ Domn)    &   ⊢ (𝜑 → 𝐹 ∈ 𝑁)    &   ⊢ (𝜑 → 𝑍 ∈ 𝑄)    ⇒   ⊢ (𝜑 → ∃!𝑞 ∈ 𝑍 (𝐷‘𝑞) < (𝐷‘𝐹))
Definition	df-sfl1 35676*	Temporary construction for the splitting field of a polynomial. The inputs are a field 𝑟 and a polynomial 𝑝 that we want to split, along with a tuple 𝑗 in the same format as the output. The output is a tuple ⟨𝑆, 𝐹⟩ where 𝑆 is the splitting field and 𝐹 is an injective homomorphism from the original field 𝑟. The function works by repeatedly finding the smallest monic irreducible factor, and extending the field by that factor using the polyFld construction. We keep track of a total order in each of the splitting fields so that we can pick an element definably without needing global choice. (Contributed by Mario Carneiro, 2-Dec-2014.)
⊢ splitFld1 = (𝑟 ∈ V, 𝑗 ∈ V ↦ (𝑝 ∈ (Poly1‘𝑟) ↦ (rec((𝑠 ∈ V, 𝑓 ∈ V ↦ ⦋(Poly1‘𝑠) / 𝑚⦌⦋{𝑔 ∈ ((Monic1p‘𝑠) ∩ (Irred‘𝑚)) ∣ (𝑔(∥r‘𝑚)(𝑝 ∘ 𝑓) ∧ 1 < (𝑠deg1𝑔))} / 𝑏⦌if(((𝑝 ∘ 𝑓) = (0g‘𝑚) ∨ 𝑏 = ∅), ⟨𝑠, 𝑓⟩, ⦋(glb‘𝑏) / ℎ⦌⦋(𝑠 polyFld ℎ) / 𝑡⦌⟨(1st ‘𝑡), (𝑓 ∘ (2nd ‘𝑡))⟩)), 𝑗)‘(card‘(1...(𝑟deg1𝑝))))))
Definition	df-sfl 35677*	Define the splitting field of a finite collection of polynomials, given a total ordered base field. The output is a tuple ⟨𝑆, 𝐹⟩ where 𝑆 is the totally ordered splitting field and 𝐹 is an injective homomorphism from the original field 𝑟. (Contributed by Mario Carneiro, 2-Dec-2014.)
⊢ splitFld = (𝑟 ∈ V, 𝑝 ∈ V ↦ (℩𝑥∃𝑓(𝑓 Isom < , (lt‘𝑟)((1...(♯‘𝑝)), 𝑝) ∧ 𝑥 = (seq0((𝑒 ∈ V, 𝑔 ∈ V ↦ ((𝑟 splitFld1 𝑒)‘𝑔)), (𝑓 ∪ {⟨0, ⟨𝑟, ( I ↾ (Base‘𝑟))⟩⟩}))‘(♯‘𝑝)))))
Definition	df-psl 35678*	Define the direct limit of an increasing sequence of fields produced by pasting together the splitting fields for each sequence of polynomials. That is, given a ring 𝑟, a strict order on 𝑟, and a sequence 𝑝:ℕ⟶(𝒫 𝑟 ∩ Fin) of finite sets of polynomials to split, we construct the direct limit system of field extensions by splitting one set at a time and passing the resulting construction to HomLim. (Contributed by Mario Carneiro, 2-Dec-2014.)
⊢ polySplitLim = (𝑟 ∈ V, 𝑝 ∈ ((𝒫 (Base‘𝑟) ∩ Fin) ↑m ℕ) ↦ ⦋(1st ∘ seq0((𝑔 ∈ V, 𝑞 ∈ V ↦ ⦋(1st ‘𝑔) / 𝑒⦌⦋(1st ‘𝑒) / 𝑠⦌⦋(𝑠 splitFld ran (𝑥 ∈ 𝑞 ↦ (𝑥 ∘ (2nd ‘𝑔)))) / 𝑓⦌⟨𝑓, ((2nd ‘𝑔) ∘ (2nd ‘𝑓))⟩), (𝑝 ∪ {⟨0, ⟨⟨𝑟, ∅⟩, ( I ↾ (Base‘𝑟))⟩⟩}))) / 𝑓⦌((1st ∘ (𝑓 shift 1)) HomLim (2nd ∘ 𝑓)))
21.6.17  p-adic number fields
Syntax	czr 35679	Integral elements of a ring.
class ZRing
Syntax	cgf 35680	Galois finite field.
class GF
Syntax	cgfo 35681	Galois limit field.
class GF∞
Syntax	ceqp 35682	Equivalence relation for df-qp 35693.
class ~Qp
Syntax	crqp 35683	Equivalence relation representatives for df-qp 35693.
class /Qp
Syntax	cqp 35684	The set of 𝑝-adic rational numbers.
class Qp
Syntax	czp 35685	The set of 𝑝-adic integers. (Not to be confused with czn 21437.)
class Zp
Syntax	cqpa 35686	Algebraic completion of the 𝑝-adic rational numbers.
class _Qp
Syntax	ccp 35687	Metric completion of _Qp.
class Cp
Definition	df-zrng 35688	Define the subring of integral elements in a ring. (Contributed by Mario Carneiro, 2-Dec-2014.)
⊢ ZRing = (𝑟 ∈ V ↦ (𝑟 IntgRing ran (ℤRHom‘𝑟)))
Definition	df-gf 35689*	Define the Galois finite field of order 𝑝↑𝑛. (Contributed by Mario Carneiro, 2-Dec-2014.)
⊢ GF = (𝑝 ∈ ℙ, 𝑛 ∈ ℕ ↦ ⦋(ℤ/nℤ‘𝑝) / 𝑟⦌(1st ‘(𝑟 splitFld {⦋(Poly1‘𝑟) / 𝑠⦌⦋(var1‘𝑟) / 𝑥⦌(((𝑝↑𝑛)(.g‘(mulGrp‘𝑠))𝑥)(-g‘𝑠)𝑥)})))
Definition	df-gfoo 35690*	Define the Galois field of order 𝑝↑+∞, as a direct limit of the Galois finite fields. (Contributed by Mario Carneiro, 2-Dec-2014.)
⊢ GF∞ = (𝑝 ∈ ℙ ↦ ⦋(ℤ/nℤ‘𝑝) / 𝑟⦌(𝑟 polySplitLim (𝑛 ∈ ℕ ↦ {⦋(Poly1‘𝑟) / 𝑠⦌⦋(var1‘𝑟) / 𝑥⦌(((𝑝↑𝑛)(.g‘(mulGrp‘𝑠))𝑥)(-g‘𝑠)𝑥)})))
Definition	df-eqp 35691*	Define an equivalence relation on ℤ-indexed sequences of integers such that two sequences are equivalent iff the difference is equivalent to zero, and a sequence is equivalent to zero iff the sum Σ𝑘 ≤ 𝑛𝑓(𝑘)(𝑝↑𝑘) is a multiple of 𝑝↑(𝑛 + 1) for every 𝑛. (Contributed by Mario Carneiro, 2-Dec-2014.)
⊢ ~Qp = (𝑝 ∈ ℙ ↦ {⟨𝑓, 𝑔⟩ ∣ ({𝑓, 𝑔} ⊆ (ℤ ↑m ℤ) ∧ ∀𝑛 ∈ ℤ Σ𝑘 ∈ (ℤ≥‘-𝑛)(((𝑓‘-𝑘) − (𝑔‘-𝑘)) / (𝑝↑(𝑘 + (𝑛 + 1)))) ∈ ℤ)})
Definition	df-rqp 35692*	There is a unique element of (ℤ ↑m (0...(𝑝 − 1))) ~Qp -equivalent to any element of (ℤ ↑m ℤ), if the sequences are zero for sufficiently large negative values; this function selects that element. (Contributed by Mario Carneiro, 2-Dec-2014.)
⊢ /Qp = (𝑝 ∈ ℙ ↦ (~Qp ∩ ⦋{𝑓 ∈ (ℤ ↑m ℤ) ∣ ∃𝑥 ∈ ran ℤ≥(◡𝑓 “ (ℤ ∖ {0})) ⊆ 𝑥} / 𝑦⦌(𝑦 × (𝑦 ∩ (ℤ ↑m (0...(𝑝 − 1)))))))
Definition	df-qp 35693*	Define the 𝑝-adic completion of the rational numbers, as a normed field structure with a total order (that is not compatible with the operations). (Contributed by Mario Carneiro, 2-Dec-2014.) (Revised by AV, 10-Oct-2021.)
⊢ Qp = (𝑝 ∈ ℙ ↦ ⦋{ℎ ∈ (ℤ ↑m (0...(𝑝 − 1))) ∣ ∃𝑥 ∈ ran ℤ≥(◡ℎ “ (ℤ ∖ {0})) ⊆ 𝑥} / 𝑏⦌(({⟨(Base‘ndx), 𝑏⟩, ⟨(+g‘ndx), (𝑓 ∈ 𝑏, 𝑔 ∈ 𝑏 ↦ ((/Qp‘𝑝)‘(𝑓 ∘f + 𝑔)))⟩, ⟨(.r‘ndx), (𝑓 ∈ 𝑏, 𝑔 ∈ 𝑏 ↦ ((/Qp‘𝑝)‘(𝑛 ∈ ℤ ↦ Σ𝑘 ∈ ℤ ((𝑓‘𝑘) · (𝑔‘(𝑛 − 𝑘))))))⟩} ∪ {⟨(le‘ndx), {⟨𝑓, 𝑔⟩ ∣ ({𝑓, 𝑔} ⊆ 𝑏 ∧ Σ𝑘 ∈ ℤ ((𝑓‘-𝑘) · ((𝑝 + 1)↑-𝑘)) < Σ𝑘 ∈ ℤ ((𝑔‘-𝑘) · ((𝑝 + 1)↑-𝑘)))}⟩}) toNrmGrp (𝑓 ∈ 𝑏 ↦ if(𝑓 = (ℤ × {0}), 0, (𝑝↑-inf((◡𝑓 “ (ℤ ∖ {0})), ℝ, < ))))))
Definition	df-zp 35694	Define the 𝑝-adic integers, as a subset of the 𝑝-adic rationals. (Contributed by Mario Carneiro, 2-Dec-2014.)
⊢ Zp = (ZRing ∘ Qp)
Definition	df-qpa 35695*	Define the completion of the 𝑝-adic rationals. Here we simply define it as the splitting field of a dense sequence of polynomials (using as the 𝑛-th set the collection of polynomials with degree less than 𝑛 and with coefficients < (𝑝↑𝑛)). Krasner's lemma will then show that all monic polynomials have splitting fields isomorphic to a sufficiently close Eisenstein polynomial from the list, and unramified extensions are generated by the polynomial 𝑥↑(𝑝↑𝑛) − 𝑥, which is in the list. Thus, every finite extension of Qp is a subfield of this field extension, so it is algebraically closed. (Contributed by Mario Carneiro, 2-Dec-2014.)
⊢ _Qp = (𝑝 ∈ ℙ ↦ ⦋(Qp‘𝑝) / 𝑟⦌(𝑟 polySplitLim (𝑛 ∈ ℕ ↦ {𝑓 ∈ (Poly1‘𝑟) ∣ ((𝑟deg1𝑓) ≤ 𝑛 ∧ ∀𝑑 ∈ ran (coe1‘𝑓)(◡𝑑 “ (ℤ ∖ {0})) ⊆ (0...𝑛))})))
Definition	df-cp 35696	Define the metric completion of the algebraic completion of the 𝑝 -adic rationals. (Contributed by Mario Carneiro, 2-Dec-2014.)
⊢ Cp = ( cplMetSp ∘ _Qp)
21.7  Mathbox for Filip Cernatescu I hope someone will enjoy solving (proving) the simple equations, inequalities, and calculations from this mathbox. I have proved these problems (theorems) using the Milpgame proof assistant. (It can be downloaded from https://us.metamath.org/other/milpgame/milpgame.html.)
Theorem	problem1 35697	Practice problem 1. Clues: 5p4e9 12275 3p2e5 12268 eqtri 2754 oveq1i 7356. (Contributed by Filip Cernatescu, 16-Mar-2019.) (Proof modification is discouraged.)
⊢ ((3 + 2) + 4) = 9
Theorem	problem2 35698	Practice problem 2. Clues: oveq12i 7358 adddiri 11122 add4i 11335 mulcli 11116 recni 11123 2re 12196 3eqtri 2758 10re 12604 5re 12209 1re 11109 4re 12206 eqcomi 2740 5p4e9 12275 oveq1i 7356 df-3 12186. (Contributed by Filip Cernatescu, 16-Mar-2019.) (Revised by AV, 9-Sep-2021.) (Proof modification is discouraged.)
⊢ (((2 · ;10) + 5) + ((1 · ;10) + 4)) = ((3 · ;10) + 9)
Theorem	problem3 35699	Practice problem 3. Clues: eqcomi 2740 eqtri 2754 subaddrii 11447 recni 11123 4re 12206 3re 12202 1re 11109 df-4 12187 addcomi 11301. (Contributed by Filip Cernatescu, 16-Mar-2019.) (Proof modification is discouraged.)
⊢ 𝐴 ∈ ℂ    &   ⊢ (𝐴 + 3) = 4    ⇒   ⊢ 𝐴 = 1
Theorem	problem4 35700	Practice problem 4. Clues: pm3.2i 470 eqcomi 2740 eqtri 2754 subaddrii 11447 recni 11123 7re 12215 6re 12212 ax-1cn 11061 df-7 12190 ax-mp 5 oveq1i 7356 3cn 12203 2cn 12197 df-3 12186 mullidi 11114 subdiri 11564 mp3an 1463 mulcli 11116 subadd23 11369 oveq2i 7357 oveq12i 7358 3t2e6 12283 mulcomi 11117 subcli 11434 biimpri 228 subadd2i 11446. (Contributed by Filip Cernatescu, 16-Mar-2019.) (Proof modification is discouraged.)
⊢ 𝐴 ∈ ℂ    &   ⊢ 𝐵 ∈ ℂ    &   ⊢ (𝐴 + 𝐵) = 3    &   ⊢ ((3 · 𝐴) + (2 · 𝐵)) = 7    ⇒   ⊢ (𝐴 = 1 ∧ 𝐵 = 2)