home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l455 / 7.ddi / ROBUST.DI$ / ACCROOT.M < prev    next >
Encoding:
Text File  |  1993-03-11  |  806 b   |  32 lines
  1. subplot
  2. axis([-3 2 -3 3]);
  3. plot(real(pole),imag(pole),'x',real(zero),imag(zero),'o',...
  4.      real(RL),imag(RL),'.');
  5. if flag == 3
  6.    title('Enlarged Root Locus (H-Inf + Internal Model)')
  7. else
  8.    title('Enlarged Root Locus');
  9. end
  10. xlabel('Real   (Root Locus Gain: 0:0.1:30)'); ylabel('Imag');
  11. text(0.2,1.4,'Plant');
  12. text(0.2,-1.5,'Plant');
  13. text(0.2,-0.1,'Plant');
  14. if flag == 3
  15.    text(0.2,0.4,'Int. Model');
  16.    text(0.2,-0.6,'Int. Model');
  17.    text(-2,0.5,'Int. Model');
  18.    text(-2,-0.8,'Int. Model');
  19. end
  20. %prtsc
  21. pause
  22. axis
  23. plot(real(pole),imag(pole),'x',real(zero),imag(zero),'o',...
  24.      real(RL),imag(RL),'.');
  25. if flag == 3
  26.    title('Root Locus (H-Inf + Internal Model)');
  27. else
  28.    title('Root Locus');
  29. end
  30. xlabel('Real   (Root Locus Gain: 0:0.1:30)'); ylabel('Imag');
  31. %prtsc
  32.