∀ {R : Type u} [inst : Lean.Grind.Semiring R] [inst_1 : LE R] [inst_2 : LT R] [inst_3 : Std.IsPreorder R]
  [toOrderedAdd : Lean.Grind.OrderedAdd R],
  0 < 1 →
    (∀ {a b c : R}, a < b → 0 < c → c * a < c * b) →
      (∀ {a b c : R}, a < b → 0 < c → a * c < b * c) → Lean.Grind.OrderedRing R