1 2 3 4 5 6 7 8 9 10
PROGRAM test use, intrinsic :: iso_c_binding implicit none include 'fftw3.f03' write(*,*) "ok" END PROGRAM test