Skip to content

Commit

Permalink
Reset N_MAX to 0 in DESTROY_PLANS_FFTW (#119)
Browse files Browse the repository at this point in the history
  • Loading branch information
DJDavies2 authored Jul 12, 2024
1 parent e7aace1 commit c8523be
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions src/trans/internal/tpm_fftw.F90
Original file line number Diff line number Diff line change
Expand Up @@ -241,6 +241,7 @@ SUBROUTINE DESTROY_PLANS_FFTW
IF( ASSOCIATED(TW) ) THEN
IF( ASSOCIATED(TW%FFTW_PLANS) ) DEALLOCATE(TW%FFTW_PLANS)
IF( ALLOCATED(TW%N_PLANS) ) DEALLOCATE(TW%N_PLANS)
TW%N_MAX=0
ENDIF
RETURN
END SUBROUTINE DESTROY_PLANS_FFTW
Expand Down

0 comments on commit c8523be

Please sign in to comment.