??????????????
fubction a=add(b,c)
%[bm,bn]=size(b);
%[cm,cn]=size(c);
%if  bn~=cn |bm~=cm
%  error('ERROR')
%  return
%end
a=b+c;