function [ cr, cr_dis, cr_prob, cr_ups ] = cr_init ( cr_num )

%*****************************************************************************80
%
%% cr_init() initializes the crossover probability values.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    23 January 2018
%
%  Author:
%
%    Original FORTRAN90 version by Guannan Zhang.
%    MATLAB version by John Burkardt.
%
%  Input:
%
%    integer CR_NUM, the total number of CR values.
%    1 <= CR_NUM.
%
%  Output:
%
%    real CR(CR_NUM), the CR values.
%
%    real CR_DIS(CR_NUM), the CR distances.
%
%    real CR_PROB(CR_NUM), the probability of each CR.
%
%    integer CR_UPS(CR_NUM), the number of updates for each CR.
%
  cr = zeros ( cr_num );

  for i = 1 : cr_num
    cr(i) = i / cr_num;
  end

  cr_dis = ones ( cr_num, 1 );
  cr_prob = ones ( cr_num, 1 ) / cr_num;
  cr_ups = ones ( cr_num, 1 );

  return
end

