* inverse riaa signal equalizer with 50khz pole
v1 vsigin 0 dc 0 ac 1 sin 0 1.414213562V 1kHz
x1 vsigin vsigout 0 invriaa
rl vsigout 0 47k
.include ./invriaa2.txt
.end
.control
set units=degrees
ac dec 25 10Hz 40khz
setplot ac1
plot vdb(vsigout)
pz vsigin 0 vsigout 0 vol pz
print 1/pole
print 1/zero
.endc