void test(int spd, float complex z, float hertz, int sample_rate) {
test_mag(&res[spd].mag, z, hertz, sample_rate);
if (res[spd].n > 0)
test_dphi(&res[spd].dphi, z, res[spd].prev, hertz, sample_rate);
res[spd].prev = z;
res[spd].n += 1;
}
void test(int var, float complex z, int frame, float hertz, int sample_rate) {
test_mag(&variants[var].mag, z, frame, hertz, sample_rate);
if (variants[var].n > 0) {
// test_phi(&variants[var].phi, z, variants[var].prev, frame, hertz, sample_rate);
test_dphi(&variants[var].dphi, z, variants[var].prev, frame, hertz, sample_rate);
}
variants[var].prev = z;
variants[var].n += 1;
}
void
selftest(void)
{
// for handling "errout"
if (setjmp(jbuf))
return;
#if SELFTEST
test_low_level();
test_multiply();
test_scan();
test_power();
test_factor_number();
test_test();
test_tensor();
test_bake();
test(__FILE__, s, sizeof (s) / sizeof (char *)); // "s" is in selftest.h
test_abs();
test_adj();
test_arg();
test_besselj();
test_bessely();
test_ceiling();
test_choose();
test_circexp();
test_clock();
test_cofactor();
test_condense();
test_contract();
test_defint();
test_denominator();
test_derivative();
test_dirac();
test_erf();
test_erfc();
test_expand();
test_expcos();
test_expsin();
test_factorpoly();
test_float();
test_floor();
test_gamma();
test_gcd();
test_imag();
test_inner();
test_lcm();
test_log();
test_mag();
test_mod();
test_nroots();
test_numerator();
test_outer();
test_polar();
test_quotient();
test_rationalize();
test_real();
test_rect();
test_sgn();
test_taylor();
test_transpose();
test_zero();
test_hermite();
test_laguerre();
test_legendre();
test_binomial();
test_divisors();
test_coeff();
test_sin();
test_cos();
test_tan();
test_sinh();
test_cosh();
test_tanh();
test_arcsin();
test_arcsinh();
test_arccos();
test_arccosh();
test_arctan();
test_arctanh();
test_index();
test_isprime();
test_integral();
test_simplify();
test_roots();
test_eigen();
#endif
mini_test();
logout("OK, all tests passed.\n");
}