37   double _Complex *slow;
 
   41   M_total=10000;N_total=1;
 
   43   slow=(
double _Complex*)
nfft_malloc(M_total*
sizeof(
double _Complex));
 
   55       nnfft_init_guru(&my_plan, d, N_total, M_total, N, n, m,
 
   57           MALLOC_X| MALLOC_V| MALLOC_F_HAT| MALLOC_F);
 
   66         nnfft_precompute_psi(&my_plan);
 
   82       nnfft_trafo_direct(&my_plan);
 
   90        X(error_l_infty_complex)(slow, my_plan.
f, M_total),
 
   91        X(error_l_infty_1_complex)(slow, my_plan.
f, M_total, my_plan.
f_hat,
 
   95       nnfft_finalize(&my_plan);