simp [Semiterm.val_substs]
L : Language
inst✝⁹ : L.ORing
ξ : Type u_1
n : ℕ
M : Type u_2
inst✝⁸ : Zero M
inst✝⁷ : One M
inst✝⁶ : Add M
inst✝⁵ : Mul M
inst✝⁴ : LT M
inst✝³ : M ⊧ₘ* 𝐏𝐀⁻
inst✝² : Structure L M
inst✝¹ : Structure.ORing L M
inst✝ : Structure.Monotone L M
Γ : HierarchySymbol
l k : ℕ
f : (Fin l → M) → M
g : Fin l → (Fin k → M) → M
hf : Bounded L f
hg : ∀ (i : Fin l), Bounded L (g i)
tf : Semiterm L M l
htf : ∀ (v : Fin l → M), f v ≤ Semiterm.valm M v id tf
tg : Fin l → Semiterm L M k
htg : ∀ (i : Fin l) (v : Fin k → M), g i v ≤ Semiterm.valm M v id (tg i)
v : Fin k → M
⊢ (f fun x => g x v) ≤ Semiterm.valm M v id ((Rew.substs tg) tf)
L : Language
inst✝⁹ : L.ORing
ξ : Type u_1
n : ℕ
M : Type u_2
inst✝⁸ : Zero M
inst✝⁷ : One M
inst✝⁶ : Add M
inst✝⁵ : Mul M
inst✝⁴ : LT M
inst✝³ : M ⊧ₘ* 𝐏𝐀⁻
inst✝² : Structure L M
inst✝¹ : Structure.ORing L M
inst✝ : Structure.Monotone L M
Γ : HierarchySymbol
l k : ℕ
f : (Fin l → M) → M
g : Fin l → (Fin k → M) → M
hf : Bounded L f
hg : ∀ (i : Fin l), Bounded L (g i)
tf : Semiterm L M l
htf : ∀ (v : Fin l → M), f v ≤ Semiterm.valm M v id tf
tg : Fin l → Semiterm L M k
htg : ∀ (i : Fin l) (v : Fin k → M), g i v ≤ Semiterm.valm M v id (tg i)
v : Fin k → M
⊢ (f fun x => g x v) ≤ Semiterm.val inst✝² (fun x => Semiterm.val inst✝² v id (tg x)) id tf