%------------------------------------------------------------
% Normalized 1s Slater-type function (approximates the 
%   1-s atomic wavefunctions)
%
% For more information, see Wikipedia entry:
%   http://en.wikipedia.org/wiki/1s_Slater-type_function
%------------------------------------------------------------
% Parameters:
%   r:   3-vector specifying the coordinate
%   R:   3-vector specifying the center of the function
%   soe: Slater orbital exponent
%------------------------------------------------------------
function psi = sto1s(r,R,soe)

psi = sqrt(soe^3/pi) * exp(-soe * norm(r-R));