∀ {R : Type u_1} {S : Type u_2} [inst : Semiring S] [inst_1 : PartialOrder S] {R' : Type u_3} [inst_2 : Field R]
  [inst_3 : Field R'] [inst_4 : Module R R'] [FiniteDimensional R R'] (v : AbsoluteValue R S),
  FiniteDimensional (WithAbs v) R'