Profiling for xgcd in Flint

profile-xgcd.c

#include "flint/flint.h"
#include "flint/fmpz.h"
#include "flint/profiler.h"

int main(int argc, char* argv[])
{
    timeit_t clock;
    fmpz_t d, x, y, a, b;
    slong const min = strtol(argv[1], NULL, 10);
    slong const max = strtol(argv[2], NULL, 10);

    fmpz_init(d);
    fmpz_init(x);
    fmpz_init(y);
    fmpz_init(a);
    fmpz_init(b);

    timeit_start(clock);
    for (slong ix = min; ix < max; ix++)
    {
        fmpz_set_si(a, ix);
        for (slong iy = min; iy < max; iy++)
        {
            fmpz_set_si(b, iy);
            fmpz_xgcd_canonical_bezout2(d, x, y, a, b);
        }
    }
    timeit_stop(clock);
    flint_printf("cpu: %wd\nwall: %wd\n\n", clock->cpu, clock->wall);

    timeit_start(clock);
    for (slong ix = min; ix < max; ix++)
    {
        fmpz_set_si(a, ix);
        for (slong iy = min; iy < max; iy++)
        {
            fmpz_set_si(b, iy);
            fmpz_xgcd_canonical_bezout(d, x, y, a, b);
        }
    }
    timeit_stop(clock);
    flint_printf("cpu: %wd\nwall: %wd\n\n", clock->cpu, clock->wall);

    timeit_start(clock);
    for (slong ix = min; ix < max; ix++)
    {
        fmpz_set_si(a, ix);
        for (slong iy = min; iy < max; iy++)
        {
            fmpz_set_si(b, iy);
            fmpz_xgcd(d, x, y, a, b);
        }
    }
    timeit_stop(clock);
    flint_printf("cpu: %wd\nwall: %wd\n\n", clock->cpu, clock->wall);

    fmpz_clear(d);
    fmpz_clear(x);
    fmpz_clear(y);
    fmpz_clear(a);
    fmpz_clear(b);

    return 0;
}