%% Harj. 1 teht. 14, H1T14R.m monikulmio,ympyra, ympyran kuva.

%% a)

x=linspace(-2*pi,2*pi);
plot(x,cos(x),'r',x,sin(x),'b')
shg

%% b)
t=linspace(0,2*pi);
x=cos(t);
y=sin(t);
plot(x,y)
hold on
t=linspace(0,2*pi,10);
plot(cos(t),sin(t),'r')
axis square
shg
%%
close all
t=linspace(0,2*pi);
x=cos(t);
y=sin(t);
T=[cos(t);sin(t)];  % Vrt. Strangin talo
A4=[1 3;0 1] % 'Horisontal shear'
S=A4*T;
plot(T(1,:),T(2,:),S(1,:),S(2,:))
axis equal
%axis square   % Ei toimi, kosk
figure
plot(T(1,:),T(2,:))
axis square; shg
figure
plot(S(1,:),S(2,:))
axis square
shg