plusC.m (296B)
1 function Z=plus(X,Y); 2 % The dot plus of Gauss -- matlab need exact dimensions. 3 % extends Z=X+Y 4 [n1 k1]=size(X); 5 [n2 k2]=size(Y); 6 7 if (n1==n2 & k1==k2); Z=X+Y; 8 elseif n1==n2; Z=X+kron(Y,ones(1,k1)); 9 elseif ((n1==1 & k1==1)) | ((n2==1) & (k2==1)); Z=X+Y; 10 else; Z=X+kron(Y,ones(n1,1)); 11 end;