function bessel = jed_to_yearcount_bessel ( jed )

%*****************************************************************************80
%
%% jed_to_yearcount_bessel() converts a JED to Bessel year count.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    25 June 2012
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    real JED, the Julian Ephemeris Date.
%
%  Output:
%
%    real BESSEL, the Bessel year.
%
  year_length_days = 365.242198781;

  jed_epoch = epoch_to_jed_bessel ( );
  bessel = 1900.0 + ( jed - jed_epoch ) / year_length_days;

  return
end
