function w = moments_truncated_normal_a ( m, mu, s, a )

%*****************************************************************************80
%
%% moments_truncated_normal_a(): moments of the lower truncated normal distribution.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    19 September 2013
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    integer M, the number of moments desired.
%
%    real MU, S, the mean and standard deviation of the
%    parent Normal distribution.
%    0 < S.
%
%    real A, the lower truncation limit.
%
%  Output:
%
%    real W(M), the weighted integrals of X^0 through X^(M-1).
%
  w = zeros ( m, 1 );

  for order = 0 : m - 1
    w(order+1) = truncated_normal_a_moment ( order, mu, s, a );
  end

  return
end

