mtimes.m

来自「computation of conformal maps to polygon」· M 代码 · 共 19 行

function M = mtimes(M,c)
%   Scale the image of a map by a complex constant.

%   Copyright (c) 1998 by Toby Driscoll.
%   $Id: mtimes.m 36 1998-06-29 23:14:51Z tad $

% May need to swap arguments
if isa(M,'double') & isa(c,'crrectmap')
  tmp = M;
  M = c;
  c = tmp;
end

if length(c)==1 & isa(c,'double')
  M.diskmap = c*M.diskmap;
else
  error('Multiplication is not defined for these operands.')
end