% trajectory in coordinate space.

global X Y
%X=[]; Y=[]; n=0;

cS2plotpack(n);
X = [X expect(xop(data),data)];
Y = [Y expect(yop(data),data)];
hold on
cS2plotpack(n+100);
X = [X expect(xop(data),data)];
Y = [Y expect(yop(data),data)];
cS2plotpack(n+200);
X = [X expect(xop(data),data)];
Y = [Y expect(yop(data),data)];
cS2plotpack(n+300);
X = [X expect(xop(data),data)];
Y = [Y expect(yop(data),data)];
cS2plotpack(n+400);
X = [X expect(xop(data),data)];
Y = [Y expect(yop(data),data)];
cS2plotpack(n+500);
X = [X expect(xop(data),data)];
Y = [Y expect(yop(data),data)];
cS2plotpack(n+600);
X = [X expect(xop(data),data)];
Y = [Y expect(yop(data),data)];
cS2plotpack(n+700);
X = [X expect(xop(data),data)];
Y = [Y expect(yop(data),data)];
cS2plotpack(n+800);
X = [X expect(xop(data),data)];
Y = [Y expect(yop(data),data)];
cS2plotpack(n+900);
X = [X expect(xop(data),data)];
Y = [Y expect(yop(data),data)];

plot(X,Y);
hold off
title(sprintf('particle propagation (coordinate space)'));

n=n+1000;
