
theorem
  for v be Element of RNS_Real,
     v1 be Element of REAL,
      a be Real
    st v = v1
  holds a * v = a * v1 by BINOP_2:def 11;
