Documentation

LeanPool.Incompleteness.Arithmetization.ISigmaOne.Metamath.Term.Functions

Functions #

Imported declaration from the Incompleteness formalization.

Equations
  • One or more equations did not get rendered due to their size.
Instances For

    Imported declaration from the Incompleteness formalization.

    Equations
    • One or more equations did not get rendered due to their size.
    Instances For
      noncomputable def LO.Arith.Language.termSubst {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (L : Arith.Language V) {pL : FirstOrder.Arith.LDef} [L.Defined pL] (w t : V) :
      V

      Imported declaration from the Incompleteness formalization.

      Equations
      Instances For
        noncomputable def LO.Arith.Language.termSubstVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (L : Arith.Language V) {pL : FirstOrder.Arith.LDef} [L.Defined pL] (k w v : V) :
        V

        Imported declaration from the Incompleteness formalization.

        Equations
        Instances For
          @[simp]
          theorem LO.Arith.Language.termSubst_bvar {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {w : V} (z : V) :
          L.termSubst w (qqBvar z) = nth w z
          @[simp]
          theorem LO.Arith.Language.termSubst_fvar {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {w : V} (x : V) :
          @[simp]
          theorem LO.Arith.Language.termSubst_func {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {w k f v : V} (hkf : L.Func k f) (hv : L.IsUTermVec k v) :
          L.termSubst w (qqFunc k f v) = qqFunc k f (L.termSubstVec k w v)

          Imported declaration from the Incompleteness formalization.

          Equations
          • One or more equations did not get rendered due to their size.
          Instances For

            Imported declaration from the Incompleteness formalization.

            Equations
            • One or more equations did not get rendered due to their size.
            Instances For
              @[simp]
              theorem LO.Arith.len_termSubstVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {w k ts : V} (hts : L.IsUTermVec k ts) :
              len (L.termSubstVec k w ts) = k
              @[simp]
              theorem LO.Arith.nth_termSubstVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {w k ts i : V} (hts : L.IsUTermVec k ts) (hi : i < k) :
              nth (L.termSubstVec k w ts) i = L.termSubst w (nth ts i)
              @[simp]
              theorem LO.Arith.termSubstVec_nil {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] (w : V) :
              L.termSubstVec 0 w 0 = 0
              theorem LO.Arith.termSubstVec_cons {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {w k t ts : V} (ht : L.IsUTerm t) (hts : L.IsUTermVec k ts) :
              L.termSubstVec (k + 1) w (cons t ts) = cons (L.termSubst w t) (L.termSubstVec k w ts)
              @[simp]
              theorem LO.Arith.termSubstVec_cons₁ {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {w t : V} (ht : L.IsUTerm t) :
              @[simp]
              theorem LO.Arith.termSubstVec_cons₂ {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {w t₁ t₂ : V} (ht₁ : L.IsUTerm t₁) (ht₂ : L.IsUTerm t₂) :
              L.termSubstVec 2 w ?[t₁, t₂] = ?[L.termSubst w t₁, L.termSubst w t₂]
              theorem LO.Arith.Language.IsSemitermVec.termSubst {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {n m w t : V} (hw : L.IsSemitermVec n m w) (ht : L.IsSemiterm n t) :
              L.IsSemiterm m (L.termSubst w t)
              theorem LO.Arith.Language.IsUTermVec.termSubst {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {n w t : V} (hw : L.IsUTermVec n w) (ht : L.IsSemiterm n t) :
              L.IsUTerm (L.termSubst w t)
              theorem LO.Arith.Language.IsSemitermVec.termSubstVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {w k n m v : V} (hw : L.IsSemitermVec n m w) (hv : L.IsSemitermVec k n v) :
              L.IsSemitermVec k m (L.termSubstVec k w v)
              @[simp]
              theorem LO.Arith.substs_nil {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {t : V} (ht : L.IsSemiterm 0 t) :
              L.termSubst 0 t = t
              theorem LO.Arith.termSubst_termSubst {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {l n w v t : V} (hv : L.IsSemitermVec l n v) (ht : L.IsSemiterm l t) :
              L.termSubst w (L.termSubst v t) = L.termSubst (L.termSubstVec l w v) t
              theorem LO.Arith.termSubst_eq_self {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {n w t : V} (ht : L.IsSemiterm n t) (H : i < n, nth w i = qqBvar i) :
              L.termSubst w t = t

              Imported declaration from the Incompleteness formalization.

              Equations
              • One or more equations did not get rendered due to their size.
              Instances For

                Imported declaration from the Incompleteness formalization.

                Equations
                • One or more equations did not get rendered due to their size.
                Instances For
                  noncomputable def LO.Arith.Language.termShift {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (L : Arith.Language V) {pL : FirstOrder.Arith.LDef} [L.Defined pL] (t : V) :
                  V

                  Imported declaration from the Incompleteness formalization.

                  Equations
                  Instances For
                    noncomputable def LO.Arith.Language.termShiftVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (L : Arith.Language V) {pL : FirstOrder.Arith.LDef} [L.Defined pL] (k v : V) :
                    V

                    Imported declaration from the Incompleteness formalization.

                    Equations
                    Instances For
                      @[simp]
                      @[simp]
                      theorem LO.Arith.Language.termShift_func {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {k f v : V} (hkf : L.Func k f) (hv : L.IsUTermVec k v) :
                      L.termShift (qqFunc k f v) = qqFunc k f (L.termShiftVec k v)

                      Imported declaration from the Incompleteness formalization.

                      Equations
                      Instances For

                        Imported declaration from the Incompleteness formalization.

                        Equations
                        Instances For
                          @[simp]
                          theorem LO.Arith.len_termShiftVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {k ts : V} (hts : L.IsUTermVec k ts) :
                          len (L.termShiftVec k ts) = k
                          @[simp]
                          theorem LO.Arith.nth_termShiftVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {k ts i : V} (hts : L.IsUTermVec k ts) (hi : i < k) :
                          nth (L.termShiftVec k ts) i = L.termShift (nth ts i)
                          theorem LO.Arith.termShiftVec_cons {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {k t ts : V} (ht : L.IsUTerm t) (hts : L.IsUTermVec k ts) :
                          L.termShiftVec (k + 1) (cons t ts) = cons (L.termShift t) (L.termShiftVec k ts)
                          @[simp]
                          theorem LO.Arith.termShiftVec_cons₁ {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {t₁ : V} (ht₁ : L.IsUTerm t₁) :
                          @[simp]
                          theorem LO.Arith.termShiftVec_cons₂ {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {t₁ t₂ : V} (ht₁ : L.IsUTerm t₁) (ht₂ : L.IsUTerm t₂) :
                          L.termShiftVec 2 ?[t₁, t₂] = ?[L.termShift t₁, L.termShift t₂]
                          @[simp]
                          theorem LO.Arith.Language.IsUTerm.termShift {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {t : V} (ht : L.IsUTerm t) :
                          @[simp]
                          theorem LO.Arith.Language.IsSemiterm.termShift {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {n t : V} (ht : L.IsSemiterm n t) :
                          @[simp]
                          @[simp]
                          @[simp]

                          Imported declaration from the Incompleteness formalization.

                          Equations
                          • One or more equations did not get rendered due to their size.
                          Instances For

                            Imported declaration from the Incompleteness formalization.

                            Equations
                            • One or more equations did not get rendered due to their size.
                            Instances For
                              noncomputable def LO.Arith.Language.termBShift {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (L : Arith.Language V) {pL : FirstOrder.Arith.LDef} [L.Defined pL] (t : V) :
                              V

                              Imported declaration from the Incompleteness formalization.

                              Equations
                              Instances For
                                noncomputable def LO.Arith.Language.termBShiftVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (L : Arith.Language V) {pL : FirstOrder.Arith.LDef} [L.Defined pL] (k v : V) :
                                V

                                Imported declaration from the Incompleteness formalization.

                                Equations
                                Instances For
                                  @[simp]
                                  @[simp]
                                  theorem LO.Arith.Language.termBShift_func {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {k f v : V} (hkf : L.Func k f) (hv : L.IsUTermVec k v) :
                                  L.termBShift (qqFunc k f v) = qqFunc k f (L.termBShiftVec k v)

                                  Imported declaration from the Incompleteness formalization.

                                  Equations
                                  Instances For

                                    Imported declaration from the Incompleteness formalization.

                                    Equations
                                    Instances For
                                      @[simp]
                                      theorem LO.Arith.len_termBShiftVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {k ts : V} (hts : L.IsUTermVec k ts) :
                                      len (L.termBShiftVec k ts) = k
                                      @[simp]
                                      theorem LO.Arith.nth_termBShiftVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {k ts i : V} (hts : L.IsUTermVec k ts) (hi : i < k) :
                                      nth (L.termBShiftVec k ts) i = L.termBShift (nth ts i)
                                      theorem LO.Arith.termBShiftVec_cons {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {k t ts : V} (ht : L.IsUTerm t) (hts : L.IsUTermVec k ts) :
                                      L.termBShiftVec (k + 1) (cons t ts) = cons (L.termBShift t) (L.termBShiftVec k ts)
                                      @[simp]
                                      theorem LO.Arith.termBShiftVec_cons₁ {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {t₁ : V} (ht₁ : L.IsUTerm t₁) :
                                      @[simp]
                                      theorem LO.Arith.termBShiftVec_cons₂ {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {t₁ t₂ : V} (ht₁ : L.IsUTerm t₁) (ht₂ : L.IsUTerm t₂) :
                                      L.termBShiftVec 2 ?[t₁, t₂] = ?[L.termBShift t₁, L.termBShift t₂]
                                      @[simp]
                                      theorem LO.Arith.Language.IsSemiterm.termBShift {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {n t : V} (ht : L.IsSemiterm n t) :
                                      L.IsSemiterm (n + 1) (L.termBShift t)
                                      @[simp]
                                      theorem LO.Arith.Language.IsSemitermVec.termBShiftVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {k n v : V} (hv : L.IsSemitermVec k n v) :
                                      L.IsSemitermVec k (n + 1) (L.termBShiftVec k v)
                                      noncomputable def LO.Arith.Language.qVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (L : Arith.Language V) {pL : FirstOrder.Arith.LDef} [L.Defined pL] (w : V) :
                                      V

                                      Imported declaration from the Incompleteness formalization.

                                      Equations
                                      Instances For
                                        theorem LO.Arith.len_qVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {k w : V} (h : L.IsUTermVec k w) :
                                        len (L.qVec w) = k + 1
                                        theorem LO.Arith.Language.IsSemitermVec.qVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {k n w : V} (h : L.IsSemitermVec k n w) :
                                        L.IsSemitermVec (k + 1) (n + 1) (L.qVec w)
                                        theorem LO.Arith.substs_cons_bShift {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {n u t w : V} (ht : L.IsSemiterm n t) :
                                        L.termSubst (cons u w) (L.termBShift t) = L.termSubst w t
                                        theorem LO.Arith.termShift_termSubsts {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {n m w t : V} (ht : L.IsSemiterm n t) (hw : L.IsSemitermVec n m w) :
                                        theorem LO.Arith.bShift_substs {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {n m w t : V} (ht : L.IsSemiterm n t) (hw : L.IsSemitermVec n m w) :
                                        theorem LO.Arith.substs_qVec_bShift {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {n t m w : V} (ht : L.IsSemiterm n t) (hw : L.IsSemitermVec n m w) :
                                        L.termSubst (L.qVec w) (L.termBShift t) = L.termBShift (L.termSubst w t)
                                        theorem LO.Arith.termSubstVec_qVec_qVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {v w l n m : V} (hv : L.IsSemitermVec l n v) (hw : L.IsSemitermVec n m w) :
                                        L.termSubstVec (l + 1) (L.qVec w) (L.qVec v) = L.qVec (L.termSubstVec l w v)
                                        theorem LO.Arith.termShift_qVec {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {n m w : V} (hw : L.IsSemitermVec n m w) :
                                        L.termShiftVec (n + 1) (L.qVec w) = L.qVec (L.termShiftVec n w)

                                        Imported declaration from the Incompleteness formalization.

                                        Equations
                                        Instances For
                                          @[simp]
                                          theorem LO.Arith.Language.IsTermFVFree.bvar {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {L : Arith.Language V} {pL : FirstOrder.Arith.LDef} [L.Defined pL] {n : V} (x : V) :
                                          L.IsTermFVFree n (qqBvar x) x < n
                                          @[simp]
                                          noncomputable def LO.Arith.Formalized.zero :

                                          Imported declaration from the Incompleteness formalization.

                                          Equations
                                          Instances For
                                            noncomputable def LO.Arith.Formalized.one :

                                            Imported declaration from the Incompleteness formalization.

                                            Equations
                                            Instances For
                                              noncomputable def LO.Arith.Formalized.qqAdd {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (x y : V) :
                                              V

                                              Imported declaration from the Incompleteness formalization.

                                              Equations
                                              Instances For
                                                noncomputable def LO.Arith.Formalized.qqMul {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (x y : V) :
                                                V

                                                Imported declaration from the Incompleteness formalization.

                                                Equations
                                                Instances For

                                                  Imported declaration from the Incompleteness formalization.

                                                  Equations
                                                  Instances For

                                                    Imported declaration from the Incompleteness formalization.

                                                    Equations
                                                    Instances For

                                                      Imported declaration from the Incompleteness formalization.

                                                      Equations
                                                      • One or more equations did not get rendered due to their size.
                                                      Instances For

                                                        Imported declaration from the Incompleteness formalization.

                                                        Equations
                                                        • One or more equations did not get rendered due to their size.
                                                        Instances For

                                                          Imported declaration from the Incompleteness formalization.

                                                          Equations
                                                          • One or more equations did not get rendered due to their size.
                                                          Instances For

                                                            Imported declaration from the Incompleteness formalization.

                                                            Equations
                                                            • One or more equations did not get rendered due to their size.
                                                            Instances For
                                                              @[simp]
                                                              theorem LO.Arith.Formalized.lt_qqAdd_left {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (x y : V) :
                                                              x < x ^+ y
                                                              @[simp]
                                                              theorem LO.Arith.Formalized.lt_qqAdd_right {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (x y : V) :
                                                              y < x ^+ y
                                                              @[simp]
                                                              theorem LO.Arith.Formalized.lt_qqMul_left {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (x y : V) :
                                                              x < x ^* y
                                                              @[simp]
                                                              theorem LO.Arith.Formalized.lt_qqMul_right {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (x y : V) :
                                                              y < x ^* y
                                                              theorem LO.Arith.Formalized.qqFunc_absolute {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (k f v : ) :
                                                              (qqFunc k f v) = qqFunc k f v

                                                              Imported declaration from the Incompleteness formalization.

                                                              Equations
                                                              • One or more equations did not get rendered due to their size.
                                                              Instances For

                                                                Imported declaration from the Incompleteness formalization.

                                                                Equations
                                                                Instances For
                                                                  noncomputable def LO.Arith.Formalized.Numeral.numeralAux {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (x : V) :
                                                                  V

                                                                  Imported declaration from the Incompleteness formalization.

                                                                  Equations
                                                                  Instances For
                                                                    noncomputable def LO.Arith.Formalized.numeral {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] (x : V) :
                                                                    V

                                                                    Imported declaration from the Incompleteness formalization.

                                                                    Equations
                                                                    Instances For
                                                                      @[simp]
                                                                      theorem LO.Arith.Formalized.numeral_add_two {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {n : V} :
                                                                      numeral (n + 1 + 1) = numeral (n + 1) ^+ qqOne
                                                                      theorem LO.Arith.Formalized.numeral_succ_pos {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {n : V} (pos : 0 < n) :
                                                                      numeral (n + 1) = numeral n ^+ qqOne
                                                                      @[simp]

                                                                      Imported declaration from the Incompleteness formalization.

                                                                      Equations
                                                                      • One or more equations did not get rendered due to their size.
                                                                      Instances For
                                                                        instance LO.Arith.Formalized.numeral_definable' {V : Type u_1} [ORingStruc V] [V ⊧ₘ* 𝐈Sg1] {Γ : SigmaPiDelta} {m : } :
                                                                        { Γ := Γ, rank := m + 1 }-Function₁ numeral