reserve i,j,k,m,n for Nat;
reserve R for non empty doubleLoopStr;
reserve x,y for Scalar of R;
reserve f,g,h for FinSequence of R;

theorem Th1:
  x is being_a_sum_of_amalgams_of_squares implies x is generated_from_squares
proof
  assume x is being_a_sum_of_amalgams_of_squares;
  then consider f such that
A1: f is being_a_Sum_of_amalgams_of_squares and
A2: x=f/.len f;
  thus thesis by A1,A2,Lm44;
end;
