typename UnaryReturn<RScalar<T>, FnTimesI>::Type_t  d;
typename UnaryReturn<RComplex<T>, FnTimesI>::Type_t  d;
timesI(const RScalar<T>& s1){  typename UnaryReturn<RScalar<T>, FnTimesI>::Type_t  d;  zero_rep(d.real());  d.imag() = s1.elem();  return d;}