private static void hermite_polynomial_test12(int p, double b) //****************************************************************************80 // // Purpose: // // HERMITE_POLYNOMIAL_TEST12 tests HF_EXPONENTIAL_PRODUCT. // // Licensing: // // This code is distributed under the GNU LGPL license. // // Modified: // // 26 February 2012 // // Author: // // John Burkardt // // Parameters: // // Input, int P, the maximum degree of the polynomial // factors. // // Input, double B, the coefficient of X in the exponential factor. // { double[] table; Console.WriteLine(""); Console.WriteLine("HERMITE_POLYNOMIAL_TEST12"); Console.WriteLine(" Compute a Hermite function exponential product table."); Console.WriteLine(""); Console.WriteLine(" Tij = integral ( -oo < X < +oo ) exp(B*X) Hf(I,X) Hf(J,X) dx"); Console.WriteLine(""); Console.WriteLine(" where Hf(I,X) = Hermite function of \"degree\" I."); Console.WriteLine(""); Console.WriteLine(" Maximum degree P = " + p + ""); Console.WriteLine(" Exponential argument coefficient B = " + b + ""); table = Hermite.hf_exponential_product(p, b); typeMethods.r8mat_print(p + 1, p + 1, table, " Exponential product table:"); }