WrappedNumericLike.scala

trait WrappedNumericLike[A] {
  def value: A
}

abstract class WrappedNumeric[A, N <: WrappedNumericLike[A]](value: A)(implicit num: Integral[A])
    extends WrappedNumericLike[A] {
  val companion: A => N
  def +(x: N): N = companion(num.plus(value, x.value))
  def -(x: N): N = companion(num.minus(value, x.value))
  def /(x: N): N = companion(num.quot(value, x.value))
  def /(x: A): N = companion(num.quot(value, x))
  def %(x: N): N = companion(num.rem(value, x.value))
  def %(x: A): N = companion(num.rem(value, x))

  def <=(x: N): Boolean = num.lteq(value, x.value)
  def >=(x: N): Boolean = num.gteq(value, x.value)
  def <(x: N): Boolean = num.lt(value, x.value)
  def >(x: N): Boolean = num.gt(value, x.value)
}