% trajectory in momentum space.

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

Ppath;
