issamebeam.m

来自「beamlet变化的工具箱」· M 代码 · 共 30 行

%   IsSameBeam -- If there is a double passed beam in the path.
%              if yes, logic=1; otherwise logic=0
%   Usage
%     logic = IsSameBeam(Last1,Last2,Last3,vold,vnew,ind)
%   Inputs
%     Last1          list, first coordinate of the last vertex
%     Last2          list, second coordinate of the last vertex
%     Last3          list, index of the quadruplet at the last vertex
%     Nquadruplets   list, number of quadruplets at vertices
%     vold           old vertex
%     vnew           new vertex
%     ind        index of the quadruplet at 'vold'
%   Output
%     logic      if the path passed (vold,vnew), then = 1; otherwise = 0
%  
%
%
% Part of BeamLab Version:200
% Built:Friday,23-Aug-2002 00:00:00
% This is Copyrighted Material
% For Copying permissions see COPYING.m
% Comments? e-mail [e-mail]
%
%
% Part of BeamLab Version:200
% Built:Saturday,14-Sep-2002 00:00:00
% This is Copyrighted Material
% For Copying permissions see COPYING.m
% Comments? e-mail [e-mail]
%