function RESULT = sqrt_function ( A )
%
%% SQRT_FUNCTION estimates the square root of number.
%  
%  A, input, is the number whose square root is desired.
%
%  RESULT, output, is the estimated square root of X.
%
  L = A;
  for k = 1 : 10
    W = A / L;
    L = ( L + W ) / 2;
  end
  RESULT = L;

  return
end

