public static void hermite_poly_phys_coef_test() //****************************************************************************80 // // Purpose: // // HERMITE_POLY_PHYS_COEF_TEST tests HERMITE_POLY_PHYS_COEF. // // Licensing: // // This code is distributed under the GNU LGPL license. // // Modified: // // 02 June 2007 // // Author: // // John Burkardt // { const int N = 5; double[] c = new double[(N + 1) * (N + 1)]; int i; Console.WriteLine(""); Console.WriteLine("HERMITE_POLY_PHYS_COEF_TEST"); Console.WriteLine(" HERMITE_POLY_PHYS_COEF: physicist's Hermite polynomial coefficients."); Hermite.hermite_poly_phys_coef(N, ref c); for (i = 0; i <= N; i++) { Console.WriteLine(""); Console.WriteLine(" H(" + i + ")"); Console.WriteLine(""); int j; for (j = i; 0 <= j; j--) { switch (j) { case 0: Console.WriteLine(c[i + j * (N + 1)].ToString(CultureInfo.InvariantCulture).PadLeft(14) + ""); break; case 1: Console.WriteLine(c[i + j * (N + 1)].ToString(CultureInfo.InvariantCulture).PadLeft(14) + " * x"); break; default: Console.WriteLine(c[i + j * (N + 1)].ToString(CultureInfo.InvariantCulture).PadLeft(14) + " * x^" + j + ""); break; } } } }