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;
}
}
}
}
