function insurance_simulation_test1 ( )

%*****************************************************************************80
%
%% insurance_simulation_test1() observes a single case year by year.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    10 February 2024
%
%  Author:
%
%    John Burkardt
%
  fprintf ( 1, '\n' );
  fprintf ( 1, 'insurance_simulation_test1()\n' );
  fprintf ( 1, '  Observe a single case year by year.\n' );

  age = 25;
  term = 40;
  yearly_fee = 500.0;
  death_benefit = 100000.0;

  pay_in_total = 0.0;
  pay_out_total = 0.0;
  value_total = 0.0;
  pay_age_total = zeros ( 100, 1 );

  verbose = true;

  [ pay_in, pay_out, pay_age, value ] = insurance_simulation ( ...
    age, term, yearly_fee, death_benefit, verbose );

  return
end

