77   INTEGER, INTENT(in)           :: nxx_, isgn  local
93   if ( abs (isgn) == 1 ) then          ! It's a potential FFT
95   else if ( abs (isgn) == 2 ) then     ! It's a wavefunction FFT
97   else if ( abs (isgn) == 3 ) then     ! It's a wavefunction FFT with task group
130   IF (isgn.gt.0) THEN
336   INTEGER, INTENT(in)                            :: isgn  local
350   if ( abs (isgn) == 1 ) then      ! It's a potential FFT
354   else if ( abs (isgn) == 2 ) then ! It's a wavefunction FFT
358   else if ( abs (isgn) == 3 ) then ! It's a wavefunction FFT with task group
373   IF (isgn.gt.0) THEN
620   INTEGER, INTENT(in)           :: nxx_, isgn  local
627   if ( abs (isgn) == 1 ) then      ! It's a potential FFT
629   else if ( abs (isgn) == 2 ) then ! It's a wavefunction FFT
631   else if ( abs (isgn) == 3 ) then ! It's a wavefunction FFT with task group
667   IF (isgn.gt.0) THEN
883   INTEGER, INTENT(in)                            :: isgn, howmany  local
897   if ( abs (isgn) == 1 ) then      ! It's a potential FFT
901   else if ( abs (isgn) == 2 ) then ! It's a wavefunction FFT
905   else if ( abs (isgn) == 3 ) then ! It's a wavefunction FFT with task group
919   IF (isgn.gt.0) THEN
1133   INTEGER, INTENT(in)           :: nxx_, isgn  local
1140   if ( abs (isgn) /= 3 ) call fftx_error__ ('fft_scatter_tg', 'wrong call', 1 )
1145   if ( isgn > 0 ) then
1182   INTEGER, INTENT(in)           :: nxx_, isgn  local
1189   if ( abs (isgn) /= 3 ) call fftx_error__ ('fft_scatter_tg', 'wrong call', 1 )
1193   if ( isgn > 0 ) then