function month_name = i4_to_month_name ( m )

%*****************************************************************************80
%
%% i4_to_month_name() returns the name of a given month.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    15 January 2013
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    integer M: the month index, between 1 and 12.
%
%  Output:
%
%    string MONTH_NAME: the month's name.  
%
  name = [ ...
    'January  '; 'February '; 'March    '; 'April    '; ...
    'May      '; 'June     '; 'July     '; 'August   '; ...
    'September'; 'October  '; 'November '; 'December ' ];

  if ( m < 1 || 12 < m )
    month_name = '?';
  else
    month_name = strip ( name(m,:) );
  end

  return
end
