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) + "");
        }
    }