void get_set_of_pandigital_products(int* begin, int* end, std::set<int>& prods) { int n_digits = end-begin; int n_max = 5; int x1, x2, res; do { for (int i = 0; i < n_max-1; ++ i) { x1 = get_int_from_array(begin, begin+i); x2 = get_int_from_array(begin+i, begin+n_max); res = get_int_from_array(begin+n_max, begin+n_digits); if (check_product(x1, x2, res)) { prods.insert(res); } } } while (std::next_permutation(begin, end)); }
int main(void) { uint32_t i, j, n; pprod_t *q; init_pprod_table(&ptbl, 10); init_pp_buffer(&buffer, 10); p[0] = empty_pp; p[1] = var_pp(0); p[2] = var_pp(1); p[3] = var_pp(2); p[4] = var_pp(3); num_prods = 5; for (i=0; i<5; i++) { for (j=0; j<5; j++) { q = pprod_mul(&ptbl, p[i], p[j]); print_pprod0(stdout, p[i]); printf(" * "); print_pprod0(stdout, p[j]); printf(" = "); print_pprod0(stdout, q); printf("\n"); check_product(q); printf("\n"); } } n = num_prods; for (i=0; i<n; i++) { for (j=0; j<n; j++) { q = pprod_mul(&ptbl, p[i], p[j]); print_pprod0(stdout, p[i]); printf(" * "); print_pprod0(stdout, p[j]); printf(" = "); print_pprod0(stdout, q); printf("\n"); check_product(q); printf("\n"); } } for (i=0; i<num_prods; i++) { pp_buffer_set_pprod(&buffer, p[i]); printf("p[%"PRIu32"] = %p = ", i, p[i]); print_pprod0(stdout, p[i]); printf("\n"); printf("buffer: "); print_pp_buffer0(stdout, &buffer); printf("\n"); q = pprod_from_buffer(&ptbl, &buffer); printf("prod from buffer = %p = ", q); print_pprod0(stdout, q); if (q != p[i]) { printf("BUG: HASH CONSING FAILED\n"); fflush(stdout); abort(); } printf("\n\n"); } // delete the non-trivial products for (i=5; i<num_prods; i++) { q = p[i]; assert(q != empty_pp && q != end_pp && !pp_is_var(q)); printf("deleting p[%"PRIu32"] = %p = ", i, q); print_pprod0(stdout, q); printf("\n"); delete_pprod(&ptbl, q); } printf("\n\n"); p[5] = var_pp(4); num_prods = 6; // reconstruct more products q = pprod_mul(&ptbl, p[1], p[2]); printf("checking q = %p = ", q); print_pprod0(stdout, q); printf("\n"); check_product(q); printf("\n"); q = pprod_mul(&ptbl, p[2], p[3]); printf("checking q = %p = ", q); print_pprod0(stdout, q); printf("\n"); check_product(q); printf("\n"); q = pprod_mul(&ptbl, p[3], p[2]); printf("rechecking q = %p = ", q); print_pprod0(stdout, q); printf("\n"); check_product(q); printf("\n"); q = pprod_mul(&ptbl, p[3], p[4]); printf("checking q = %p = ", q); print_pprod0(stdout, q); printf("\n"); check_product(q); printf("\n"); q = pprod_mul(&ptbl, p[4], p[3]); printf("rechecking q = %p = ", q); print_pprod0(stdout, q); printf("\n"); check_product(q); printf("\n"); q = pprod_mul(&ptbl, p[4], p[5]); printf("checking q = %p = ", q); print_pprod0(stdout, q); printf("\n"); check_product(q); printf("\n"); q = pprod_mul(&ptbl, p[0], p[5]); printf("checking q = %p = ", q); print_pprod0(stdout, q); printf("\n"); check_product(q); printf("\n"); printf("*** Table content before GC ***\n"); print_pprod_table(stdout, &ptbl); pprod_table_set_gc_mark(&ptbl, p[num_prods - 1]); pprod_table_gc(&ptbl); printf("\n*** Table content after GC ***\n"); print_pprod_table(stdout, &ptbl); printf("\n"); delete_pp_buffer(&buffer); delete_pprod_table(&ptbl); return 0; }