function month_name = month_to_month_name_hebrew ( y, m )

%*****************************************************************************80
%
%% month_to_month_name_hebrew() returns the name of a Hebrew month.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    11 March 2013
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    integer M, the month index.
%
%  Output:
%
%    string MONTH_NAME, the month name.
%
  name = [ ...
    'Tishri   '; 'Heshvan  '; 'Kislev   '; 'Tebet    '; 'Shebat   '; ...
    'Adar     '; 'Veadar   '; 'Nisan    '; 'Iyar     '; 'Sivan    '; ...
    'Tammuz   '; 'Ab       '; 'Elul     ' ];

  if ( year_is_embolismic_hebrew ( y ) )

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

  else

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

  end

  return
end
