Fix single/double corruption
Use pointers in passf()

This fixes the warning:

src/fourier.f90:413.56:

            call passf(NAC, IDO, IP, L1, IDL1, C, C, C, CH, CH, &
                                                        1
Warning: Same actual argument associated with INTENT(OUT) argument 'ch' and INTENT(OUT) argument 'ch2' at (1)
Allow to specify Lapack location