From cd8781f4f3e63601ab907e361180ef0a49d133a6 Mon Sep 17 00:00:00 2001 From: Wojtek Kosior Date: Sat, 1 Jun 2019 17:03:09 +0200 Subject: remove old comment --- src/f1.f90 | 2 -- 1 file changed, 2 deletions(-) diff --git a/src/f1.f90 b/src/f1.f90 index 955be71..1c3ced5 100644 --- a/src/f1.f90 +++ b/src/f1.f90 @@ -56,8 +56,6 @@ PROGRAM test t = (i - 1) * delta + start arr_real(i) = real(f1(t), C_DOUBLE) -! write(*,*) t, " ", arr_real(i) - END DO call fftw_execute_dft_r2c(plan, arr_real, arr_complex) -- cgit v1.2.3