1 2 3 4 5 6 7
function locus3(z) s=%s H=syslin('c',s+2,s^2+2*s+3) evans(H,z) xgrid() xtitle('Root locus of G(s) = (s+2)/(s^2+2*s+3)') endfunction