∀ {k : Type u_1} {V1 : Type u_2} [inst : Ring k] [inst_1 : AddCommGroup V1] [inst_2 : Module k V1]
  [inst_3 : LinearOrder k] [inst_4 : Preorder V1] [AddRightMono V1] [SMulPosMono k V1] {p₀ p₁ : V1},
  p₀ ≤ p₁ → Monotone ⇑(AffineMap.lineMap p₀ p₁)