function ccollatziter(u,v,t);
%real, imag, iterations
%Example ccollatziter(-71,.01,10)
%clf;
steps=t;
res=200;
xi=zeros(1,steps);
yi=xi;
xi(1)=u;
yi(1)=v;
i=2;
for i=2:steps
    [xi(i),yi(i)]=myfn(xi(i-1),yi(i-1));
end
for i=1:steps
        fprintf('%2.4f %2.4f\n',xi(i),yi(i));
end
fprintf('Steps=%2.0f \n',steps);


function [myvalx,myvaly]=myfn(x,y);   
z=complex(x,y);
z=(2+7*z-(2+5*z)*cos(pi*z))/4;
myvalx=real(z);
myvaly=imag(z);