148{
149 int* a = ar->array;
150 int total_sum = 0;
151 int lo = a[0];
152 int hi = a[1];
153 int len = a[2] + 1;
154 o << "total ";
155 for (int lev = 0; lev < len; lev++)
156 {
158 for (int d = lo; d <= hi; d++) sum += a[len * (d - lo) + lev + 3];
161 o << ' ';
162 }
163 o <<
" [" << total_sum <<
"]" <<
newline;
164 for (int d = lo; d <= hi; d++)
165 {
167 o << ": ";
168 for (int lev = 0; lev < len; lev++)
169 {
170 int c = a[len * (d - lo) + lev + 3];
171 if (c != 0)
173 else
174 o << " -";
175 o << " ";
176 }
178 }
179}
const mpreal sum(const mpreal tab[], const unsigned long int n, int &status, mp_rnd_t mode=mpreal::get_default_rnd())