private static void hpp_test015()
//****************************************************************************80
//
// Purpose:
//
// HPP_TEST015 tests HEP_COEFFICIENTS.
//
// Licensing:
//
// This code is distributed under the GNU LGPL license.
//
// Modified:
//
// 22 October 2014
//
// Author:
//
// John Burkardt
//
{
double[] c;
int[] e;
int[] f;
int[] l = new int[1];
int m;
int n;
int o;
int o_max;
string title;
m = 1;
Console.WriteLine("");
Console.WriteLine("HPP_TEST015:");
Console.WriteLine(" HEP_COEFFICIENTS computes the coefficients and");
Console.WriteLine(" exponents of the Hermite polynomial He(n,x).");
for (n = 1; n <= 5; n++)
{
o = (n + 2) / 2;
c = new double[o];
e = new int[o];
f = new int[o];
Hermite.hep_coefficients(n, ref o, ref c, ref f);
l[0] = n;
o_max = o;
Hermite.hepp_to_polynomial(m, l, o_max, o, ref c, ref e);
Console.WriteLine("");
title = " He(" + n + ",x) =";
Polynomial.polynomial_print(m, o, c, e, title);
}
}
