Description: Assume the scalar product of the extended real structure is the extended real number multiplication operation (this has to be defined in the main body of set.mm). (Contributed by Thierry Arnoux, 22-Oct-2017)
|- *e = ( .s ` RR*s )
|- *e
|- .s
|- RR*s
|- ( .s ` RR*s )