figure(1)
     subplot(2,1,1)
     x=[0:0.1:2*pi];
plot(x,cos(x))
     subplot(2,1,2)
     plot(x,(e.^(j.*x)+e.^(-j.*x))/2)