let R be non empty doubleLoopStr ; :: thesis: for x, y being Scalar of R st x is generated_from_squares & y is being_a_sum_of_squares holds
x + y is generated_from_squares

let x, y be Scalar of R; :: thesis: ( x is generated_from_squares & y is being_a_sum_of_squares implies x + y is generated_from_squares )
assume that
A1: x is generated_from_squares and
A2: y is being_a_sum_of_squares ; :: thesis: x + y is generated_from_squares
y is generated_from_squares by A2, Lm38;
hence x + y is generated_from_squares by A1, Lm64; :: thesis: verum