{
Subscript N=A.dim();
s << N << endl;
s << N << std::endl;
for (Subscript i=0; i<N; i++)
s << A[i] << " " << endl;
s << A[i] << " " << std::endl;
s << endl;
s << std::endl;
return s;
}
