smpl 1 2        'use with bn.wf
genr x=0
smpl 1 200
genr u=nrnd
smpl 3 200
series x=x(-1) +0.6*x(-1)-0.6*x(-2) +u+0.5*u(-1)
smpl 1 2
genr TR=0
smpl 3 200
series TR= TR(-1)+(1.5/0.4)*u
genr CYCLE=X-TR   'previously was cycle=x-p 
plot cycle TR x


'smpl 1980q1 1980q2
'genr TR1=0
'smpl 1980q3 2004q1
'series TR1= TR1(-1)+1.39*resreer1
'genr CYCLE1=canada-TR1   
'plot cycle1 TR1 canada