∀ {α : Type u_1} {r : Std.Roo α} [inst : Std.PRange.UpwardEnumerable α] [Std.PRange.LawfulUpwardEnumerable α]
  (next : α), Std.PRange.succ? r.lower = some next → Std.PRange.succMany? 1 r.lower = some next