Seems to work

Author: prisae

meson.build

@@ -6,7 +6,7 @@ if meson.get_compiler('fortran').get_id() == 'gcc'
     # Allow argument mismatch, otherwise (newer, probably >= 10) gfortran throws
     # Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4)
     add_global_arguments('-fallow-argument-mismatch',
-	language: ['fortran'])
+    language: ['fortran'])
 endif
 
 py = import('python')
@@ -17,10 +17,10 @@ f2py_module_c = f'@[email protected]'
 f2py_wrapper_f = f'@[email protected]'
 f2py_dep = custom_target(
     'f2py wrappers',
-    input: ['src/fftlog.pyf', 'src/fftlog.f'],
+    input: 'src/fftlog.pyf',
     output: [f2py_module_c, f2py_wrapper_f],
     command: [py3, '-m', 'numpy.f2py', '@INPUT@',
-		'--build-dir', '@OUTDIR@', '-m', '_fftlog'],
+    '--build-dir', '@OUTDIR@', ],
 )
 
 incdir_numpy = run_command(py3,
@@ -40,15 +40,16 @@ py3.extension_module('_fftlog',
      'src/drfftb.f',
      'src/drfftf.f',
      'src/drffti.f',
-     'src/fftlog.f'],
+     'src/fftlog.f',
+     ],
     link_language: 'fortran',
     include_directories: inc_np,
     install : true,
     subdir: 'fftlog',
 )
 
 py3.install_sources([
-	'src/__init__.py',
+    'src/__init__.py',
     ],
     pure: false,
     subdir: 'fftlog',

src/fftlog.pyf

@@ -19,8 +19,8 @@ python module _fftlog ! in
             real*8 intent(in) :: dlnr
             real*8 optional, intent(in, out) :: kr=1
             integer optional, intent(in) :: kropt=1
-            real*8 dimension(2*n+3*(n/2)+19), intent(hide, out) :: wsave
-            logical intent(hide, out) :: ok
+            real*8 dimension(2*n+3*(n/2)+19), intent(out) :: wsave
+            logical intent(out) :: ok
         end subroutine fhti
         subroutine fftl(n,a,rk,dir,wsave) ! in :fftlog:src/fftlog.f
             integer, optional, intent(hide), depend(a) :: n=len(a)