squiggle.c/scratchpad/scratchpad.c

#include "../squiggle.h"
#include "../squiggle_more.h"
#include <math.h>
#include <stdint.h>
#include <stdio.h>
#include <stdlib.h>

int main()
{
    // set randomness seed
    uint64_t* seed = malloc(sizeof(uint64_t));
    *seed = 1000; // xorshift can't start with a seed of 0
    /*
    for (int i = 0; i < 100; i++) {
        double draw = sample_unit_uniform(seed);
        printf("%f\n", draw);

    }*/
    // Test division
    // printf("\n%d\n", 10 % 3);
    //
    
    int n_samples = 100, n_threads = 16;
    double* results = malloc(n_samples * sizeof(double));
    double sampler_scratchpad(uint64_t* seed){
        return 1;
    }
    parallel_sampler(sampler_scratchpad, results, n_threads, n_samples);
    for(int i=0; i<n_samples; i++){
        printf("Sample %d: %f\n", i, results[i]);
    }

    free(seed);
}