/*--------------------------------------------------------------------------*/ int sci_fftw_forget_wisdom(char *fname, unsigned long fname_len) { CheckInputArgument(pvApiCtx, 0, 0); FreeFFTWPlan(getSci_Backward_Plan()); FreeFFTWPlan(getSci_Forward_Plan()); call_fftw_forget_wisdom(); return 0; }
/*--------------------------------------------------------------------------*/ int sci_fftw_forget_wisdom(char *fname, void* pvApiCtx) { CheckInputArgument(pvApiCtx, 0, 0); FreeFFTWPlan(getSci_Backward_Plan()); FreeFFTWPlan(getSci_Forward_Plan()); call_fftw_forget_wisdom(); AssignOutputVariable(pvApiCtx, 1) = 0; ReturnArguments(pvApiCtx); return 0; }