var cl_I zr = x.rep * y.rep;
zr = ldb(zr,cl_byte(m1,m1)) + ldb(zr,cl_byte(m1,0));
return _cl_MI(R, zr >= R->modulus ? zr - R->modulus : zr);
var cl_I zr = x.rep * y.rep;
zr = ldb(zr,cl_byte(m1,m1)) + ldb(zr,cl_byte(m1,0));
return _cl_MI(R, zr >= R->modulus ? zr - R->modulus : zr);