+ strcat (st->string, "\nPolys: ");
+ if (p >= 1000000)
+ sprintf (st->string + strlen(st->string), "%lu,%03lu,%03lu%s",
+ (p / 1000000), ((p / 1000) % 1000), (p % 1000), s);
+ else if (p >= 1000)
+ sprintf (st->string + strlen(st->string), "%lu,%03lu%s",
+ (p / 1000), (p % 1000), s);
+ else
+ sprintf (st->string + strlen(st->string), "%lu%s", p, s);
+ }