function value = i4_is_integer ( a )

%*****************************************************************************80
%
%% i4_is_integer() is TRUE if an I4 has an integer value.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    07 April 2020
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    real A, the value.
%
%  Output:
%
%    logical VALUE, is true if A has an integer value.
%
  value = ( a == round ( a ) );

  return
end
