def herndon_determinant_test ( ): #*****************************************************************************80 # ## HERNDON_DETERMINANT_TEST tests HERNDON_DETERMINANT. # # Licensing: # # This code is distributed under the GNU LGPL license. # # Modified: # # 12 February 2015 # # Author: # # John Burkardt # from herndon import herndon from r8mat_print import r8mat_print print '' print 'HERNDON_DETERMINANT_TEST' print ' HERNDON_DETERMINANT computes the HERNDON determinant.' m = 5 n = m a = herndon ( n ) r8mat_print ( m, n, a, ' HERNDON matrix:' ) value = herndon_determinant ( n ) print '' print ' Value = %g' % ( value ) print '' print 'HERNDON_DETERMINANT_TEST' print ' Normal end of execution.' return
def herndon_test ( ): #*****************************************************************************80 # ## HERNDON_TEST tests HERNDON. # # Licensing: # # This code is distributed under the GNU LGPL license. # # Modified: # # 12 February 2015 # # Author: # # John Burkardt # from r8mat_print import r8mat_print print '' print 'HERNDON_TEST' print ' HERNDON computes the HERNDON matrix.' m = 5 n = m a = herndon ( n ) r8mat_print ( m, n, a, ' HERNDON matrix:' ) print '' print 'HERNDON_TEST' print ' Normal end of execution.' return