public static void bessel_k0_int_values_test() //****************************************************************************80 // // Purpose: // // BESSEL_K0_INT_VALUES_TEST tests BESSEL_K0_INT_VALUES. // // Licensing: // // This code is distributed under the GNU LGPL license. // // Modified: // // 07 February 2007 // // Author: // // John Burkardt // { double bip = 0; double x = 0; Console.WriteLine(""); Console.WriteLine("BESSEL_K0_INT_VALUES_TEST:"); Console.WriteLine(" BESSEL_K0_INT_VALUES stores values of "); Console.WriteLine(" the integral of the Bessel K0 function."); Console.WriteLine(""); Console.WriteLine(" X FX"); Console.WriteLine(""); int n_data = 0; for (;;) { Bessel.bessel_k0_int_values(ref n_data, ref x, ref bip); if (n_data == 0) { break; } Console.WriteLine(" " + x.ToString("0.################").PadLeft(24) + " " + bip.ToString("0.################").PadLeft(24) + ""); } }