rayxgridfb.m

来自「用matlab实现图像融合」· M 代码 · 共 24 行

function G = rayxgridfB(F, transla, val)
%------------------------------------------------------------------------------
% Multiplies gridfunction F with element of stencil given by its value
% val and its position transla.
% Excess area is filled by extension of boundaryvalues.
%
% Design and implementation by:
% Dr. Paul M. de Zeeuw <[e-mail]>  http://homepages.cwi.nl/~pauldz/
% Last Revision: July 13, 2001.
% Copyright 1999-2002 Stichting CWI, Amsterdam
%------------------------------------------------------------------------------
o=[0 0];
if ~all(size(o) == size(transla))
  error(' rayxgridfB - unexpected dimensions of transla ')
end
if val == 0
  G = zeros(size(F));
elseif val == 1
  G = moveLRB(moveUDB(F, -transla(1)), -transla(2));
else
  G = val * moveLRB(moveUDB(F, -transla(1)), -transla(2));
end
%------------------------------------------------------------------------------