theorem :: O_RING_1:69
for R being non empty doubleLoopStr
for x, y being Scalar of R st x is being_a_sum_of_products_of_squares & y is generated_from_squares holds
x * y is generated_from_squares