English
Shift defines a morphism in SimplexCategory by composing with shiftFun and proving monotonicity.
Русский
Сдвиг задаёт морфизм в SimplexCategory через композицию с shiftFun и доказательство монотонности.
LaTeX
$$$ shift: (\Delta: SimplexCategory) (f: ⦋n⦌ \to Δ) \to (⦋n+1⦌ \to Δ) $$$
Lean4
/-- The shift of a morphism `f : ⦋n⦌ → Δ` in `SimplexCategory` corresponds to
the monotone map which sends `0` to `0` and `i.succ` to `f.toOrderHom i`. -/
@[simp]
def shift {n : ℕ} {Δ : SimplexCategory} (f : ⦋n⦌ ⟶ Δ) : ⦋n + 1⦌ ⟶ Δ :=
SimplexCategory.Hom.mk
{ toFun := shiftFun f.toOrderHom
monotone' := fun i₁ i₂ hi => by
by_cases h₁ : i₁ = 0
· subst h₁
simp only [shiftFun_zero, Fin.zero_le]
· have h₂ : i₂ ≠ 0 := by
intro h₂
subst h₂
exact h₁ (le_antisymm hi (Fin.zero_le _))
obtain ⟨j₁, hj₁⟩ := Fin.eq_succ_of_ne_zero h₁
obtain ⟨j₂, hj₂⟩ := Fin.eq_succ_of_ne_zero h₂
substs hj₁ hj₂
simpa only [shiftFun_succ] using f.toOrderHom.monotone (Fin.succ_le_succ_iff.mp hi) }