function vdot=levelc(t,v)
%LEVELC is called by the script PLO_LEV to plot the controllable target level curve for the ball map
% It is for omega= 22 rad/sec

% Last modified by S. H. Zak on Oct. 30, 1998

P_22=[8.6394 4.6968;4.6968 5.9586];
v_e=[41.1/180*pi 2*pi]';
dv=2*(v-v_e)'*P_22;
vdot=[dv(2) -dv(1)]';