header <napatool.hdr>

fs 10.0e6

directive VERBOSE
directive WINDOW  BLACKMAN_HARRIS_7

title "noise shaping"

ivar npts POWEROF2(16)

node a noise        0.0  1.0

node b differentiator a
node c differentiator b

tool fft   "fft1.out"   b 1.0  npts
tool fft   "fft2.out"   c 1.0  npts

terminate 1 <= TOOL_INDEX

directive REPEAT 25