function name = tetrahex_name ( index )

%*****************************************************************************80
%
%% tetrahex_name() returns the name of one of the tetrahex polyomonoes.
%
%  Discussion:
%
%    There is a standard name for each:  
%
%     1  bar
%     2  worm
%     3  pistol
%     4  propeller
%     5  arch
%     6  bee
%     7  wave
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    01 July 2021
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    integer INDEX, a value between 1 and 7.
%
%  Output:
%
%    character NAME, is the corresponding name.
%
  if ( index == 1 )
    name = 'arch';
  elseif ( index == 2 )
    name = 'bar';
  elseif ( index == 3 )
    name = 'bee';
  elseif ( index == 4 )
    name = 'pistol';
  elseif ( index == 5 )
    name = 'propeller';
  elseif ( index == 6 )
    name = 'wave';
  elseif ( index == 7 )
    name = 'worm';
  else
    name = '?';
  end

  return
end

