c7ximp.m

来自「高等引用数学的matlab求解的配套程序」· M 代码 · 共 4 行

   function dx=c6ximp(t,x)
   A=[sin(x(1)) cos(x(2)); -cos(x(2)) sin(x(1))];
   B=[1-x(1); -x(2)]; dx=inv(A)*B;