From ae64b714984d7573d22e9a82480aa157c7f6d5e1 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Thu, 18 Jan 2024 08:43:17 -0500 Subject: [PATCH] Fix a typo. --- lib/four2a.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/four2a.f90 b/lib/four2a.f90 index 9e08722e4..52b80394f 100644 --- a/lib/four2a.f90 +++ b/lib/four2a.f90 @@ -20,7 +20,7 @@ subroutine four2a(a,nfft,ndim,isign,iform) ! actual computations. use fftw3 - parameter (NPMAX=2100) !Max numberf of stored plans + parameter (NPMAX=2100) !Max number of stored plans parameter (NSMALL=16385) !Max half complex size of "small" FFTs complex a(nfft) !Array to be transformed complex aa(NSMALL) !Local copy of "small" a()