function zavrti(T,fi,n) %zavrti(T,fi,n) %n-krat zavrtimo tocke T v ravnini okoli izhodisca za kot fi %in jih narisemo %Tocke so podane v 2xm matriki T, x-koordinate v 1. vrstici, %y-koordinate v 2. vrstici R=[cos(fi) -sin(fi);sin(fi) cos(fi)];%sestavimo rotacijsko matriko clf;%zbrisemo obstojeco sliko hold on;%ukaz, ki omogoca, da na isti graf narisemo vec stvari plot(T(1,:),T(2,:),'r');%narisemo tocke T z rdeco (zaporedne tocke so povezane z daljicami) for i=1:n T=R*T;%tocke zarotiramo (vse hkrati) plot(T(1,:),T(2,:),'b');%narisemo nove tocke z modro end