feat(data/sum/order): with_bot α ≃o punit ⊕ₗ α and with_top α ≃o α ⊕ₗ punit (#15370)
with_bot α ≃o punit ⊕ₗ α
with_top α ≃o α ⊕ₗ punit