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="dftoutput.txt", ACTION="write", STATUS="replace") x