#!/usr/bin/env python

def i4vec_amin ( n, a ):

#*****************************************************************************80
#
## I4VEC_AMIN returns the smallest magnitude in an I4VEC.
#
#  Discussion:
#
#    An I4VEC is a vector of I4's.
#
#  Licensing:
#
#    This code is distributed under the GNU LGPL license.
#
#  Modified:
#
#    29 September 2014
#
#  Author:
#
#    John Burkardt
#
#  Parameters:
#
#    Input, integer N, the number of elements.
#
#    Input, integer A(N), the vector.
#
#    Output, integer VALUE, the smallest of the magnitudes of the entries.
#
  value = 2147483647

  for i in range ( 0, n ):
    value = min ( value, abs ( a[i] ) )

  return value

def i4vec_amin_test ( ):

#*****************************************************************************80
#
## I4VEC_AMIN_TEST tests I4VEC_AMIN.
#
#  Licensing:
#
#    This code is distributed under the GNU LGPL license.
#
#  Modified:
#
#    29 September 2014
#
#  Author:
#
#    John Burkardt
#
  from i4vec_print import i4vec_print
  from i4vec_uniform_ab import i4vec_uniform_ab

  print ''
  print 'I4VEC_AMIN_TEST'
  print '  I4VEC_AMIN computes the smallest of the magnitudes of the'
  print '  entries of an I4VEC.'

  n = 10
  lo = - 10
  hi = 5
  seed = 123456789

  a, seed = i4vec_uniform_ab ( n, lo, hi, seed )
  i4vec_print ( n, a, '  Vector A:' )
  a_amin = i4vec_amin ( n, a )
  print ''
  print '  Smallest magnitude of entries of A = %d' % ( a_amin )
#
#  Terminate.
#
  print ''
  print 'I4VEC_AMIN_TEST'
  print '  Normal end of execution.'

  return

if ( __name__ == '__main__' ):
  from timestamp import timestamp
  timestamp ( )
  i4vec_amin_test ( )
  timestamp ( )