fortran complex to real fftw issue
问题 I am currently working on a project where I need to implement a fourier transform and an inverse transform. I was testing a program I modified from an online example; the print or write commands are normally for debugging purposes: program testit INCLUDE 'fftw3.f' double complex out!, in real in parameter (N=100) dimension in(N), out(N) integer*8 p,p2 integer i,j real x real fact write(*,*)"stuff in data" OPEN(UNIT=12, FILE="input.txt", ACTION="write", STATUS="replace") OPEN(UNIT=20, FILE=