%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%Courses IA3112 and EK3114
%Calculation of poles of transfer function
%23 Oct 2017
%Finn Aakre Haugen
%finn.haugen@usn.no
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
clear all
close all
format compact
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%Definisjon av s som symbol for Laplacevariabelen:

s=tf('s')

%Eksempel på definisjon av transferfunksjon (med navn H1):

K=1
T=1
H1=K/(T*s+1)

%Beregning av polene (p) og nullpunktene (z) til H1
%(H1 har imidlertid ingen nullpunkter):

figure(1)
[p,z] = pzmap(H1)%Beregning av p og z:
pzmap(H1);%Plotting av p (og z, hvis det var noen)
grid
ylabel('Im')
xlabel('Real')

%Simulering av impulsresponsen for H1:

figure(2)
impulse(H1)
title('Impulsrespons for H1(s)')
xlabel('t [s]')
grid