sqr.m

计算动力学系统的分岔图

function ans = sqr(x)

%sqr for adtayl objects.

[m,n,p1] = size(x.tc);

if n>1 
   error('X^Y for adtayl objects is not defined'); 
else   

ans=x.*x;
end