function Valec
% funkce 4cos(t), pro t od 0 do 2pi, zobrazena jako "valec"
t=0:pi/10:2*pi;
[X,Y,Z]=cylinder(4*cos(t));
subplot(2,2,1);
mesh(X)
subplot(2,2,2);
mesh(Y)
subplot(2,2,3);
mesh(Z)
subplot(2,2,4);
surf(X,Y,Z)