stell_75 =[
'3541-a1h.cdf'
'3691-a1h.cdf'
];
start=[1990 9 13 0 0 0];
stop=[1991 4 28 0 0 0];
[w,jd]=getv('stell_75_m.cdf',start,stop);
wlp=plfilt2(w);
wllp=boxfilt(wlp,168);
wmod=boxfilt(abs(w),168);
[ur,vr,ang]=rotate(real(wllp),imag(wllp));
wr=ur+i*vr;
timeplt(jd,[wmod ur]);

