Riccasim.m
上传用户:eighthdate
上传日期:2014-05-24
资源大小:270k
文件大小:0k
源码类别:

其他行业

开发平台:

Matlab

  1. function [pdot] = riccasim(t,p)
  2. % Hadi Saadat, 1998
  3. % This function obtains the numerical solution of the time-domain Riccati
  4. % equation with the boundary condition specified at final time.
  5. global A B Q R t0 tf x0
  6. [A,B,Q,R,t0,tf,x0]=system(A,B,Q,R,t0,tf,x0);
  7. n=length(A); nsq=n*n;
  8. s=reshape(p,n,n)';
  9. r=inv(R);
  10. sdot=[s*A+A'*s+Q-s*B*r*B'*s];
  11. pdot=reshape(sdot',1,nsq);
  12. pdot=pdot';