function [ l, b ] = bet_red ( )

%*****************************************************************************80
%
%% BET_RED returns the roulette pockets for a bet on red.
%
%  Licensing:
%
%    This code is distributed under the GNU LGPL license.
%
%  Modified:
%
%    29 February 2016
%
%  Author:
%
%    John Burkardt
%
%  Parameters:
%
%    Output, integer L, the number of pockets.
%
%    Output, integer B(L), the pockets.
%
  l = 18;
  b = [ ...
     1,  3,  5,  7,  9, ...
    12, 14, 16, 18, 19, ...
    21, 23, 25, 27, 30, ...
    32, 34, 36 ];

  return
end

