reserve x1,x2,y1,a,b,c for Real;

theorem Th5:
  for p be Real st 1 <= p holds RLSStruct (#
    the_set_of_RealSequences_l^p, Zero_(the_set_of_RealSequences_l^p,
    Linear_Space_of_RealSequences), Add_(the_set_of_RealSequences_l^p,
    Linear_Space_of_RealSequences), Mult_(the_set_of_RealSequences_l^p,
Linear_Space_of_RealSequences) #) is Subspace of Linear_Space_of_RealSequences
proof
  let p be Real;
  assume 1 <= p;
  then the_set_of_RealSequences_l^p is linearly-closed by Th4;
  hence thesis by RSSPACE:11;
end;
