
complex wave used in real expression

wenjiezhao
Many thanks,
Wen-Jie
duplicate/O $wave1,w
Variable n=DimSize(w, 0)
if (mod(n, 2)==1)
DeletePoints n-1, 1, w
endif
FFT w
if (f0>0)
w[0, x2pnt(w, f0)]=0
endif
w[x2pnt(w, f1), inf]=0
IFFT w
A sloppy work around would go like this or (recommended) use the /DEST flag to create a temporary complex wave
HJ
April 2, 2015 at 06:28 am - Permalink
Let me try it.
Best regards,
W-J
April 2, 2015 at 10:39 am - Permalink