EdgeLengthOpt.m

Go to the documentation of this file.

%****f* FEM/EdgeLengthOpt
% NAME
%   EdgeLengthOpt
% USE
%   lbe=EdgeLength(be,q)
% DESCRIPTION
%   Computation of edge lengths
% INPUTS
%
% OUTPUT
%
% RETURN VALUE
%
% EXAMPLE
%
% CREATION DATE
%   January 14th 2004
% MODIFICATION HISTORY
%   None
% NOTES
%   Unoptimized
% AUTHOR
%   Cuvelier F., cuvelier@math.univ-paris13.fr
% SOURCE
%
function lbe=EdgeLengthOpt(be,q)
  lbe=sqrt(sum((q(:,be(1,:)) - q(:,be(2,:))).^2,1));
%*****