Home
last modified time | relevance | path

Searched refs:Sinc (Results 1 – 1 of 1) sorted by relevance

/phasta/phSolver/common/
H A Dbctint.f418 real*8 Sinc(nptf), FilterSW(nptf), Filtered(nptf,numImpSrfs) local
426 Sinc(j) = sin(pi*Filtime(j)*windK/nptf)/sin(pi*Filtime(j)/nptf)
428 Sinc(1) = windK
431 FilterSW(j) = Window(nptf+1-j)*Sinc(nptf+1-j) !filter for convolution