private static void hermite_polynomial_test04() //****************************************************************************80 // // Purpose: // // HERMITE_POLYNOMIAL_TEST04 tests H_POLYNOMIAL_ZEROS. // // Licensing: // // This code is distributed under the GNU LGPL license. // // Modified: // // 19 October 2014 // // Author: // // John Burkardt // { int degree; double[] hz; string title; double[] z; Console.WriteLine(""); Console.WriteLine("HERMITE_POLYNOMIAL_TEST04:"); Console.WriteLine(" H_POLYNOMIAL_ZEROS computes the zeros of H(n,x)"); Console.WriteLine(" Check by calling H_POLYNOMIAL there."); for (degree = 1; degree <= 5; degree++) { z = Hermite.h_polynomial_zeros(degree); title = " Computed zeros for H(" + degree + ",z):"; typeMethods.r8vec_print(degree, z, title); hz = Hermite.h_polynomial_value(degree, degree, z); title = " Evaluate H(" + degree + ",z):"; typeMethods.r8vec_print(degree, hz, title, aIndex: +degree * degree); } }