mcfti1 Subroutine

subroutine mcfti1(n, wa, fnf, fac)

---

MCFTI1 is an FFTPACK5 auxiliary routine.

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	n
real(kind=prec)				::	wa(*)
real(kind=prec)				::	fnf
real(kind=prec)				::	fac(*)