//      s14ba Example Program Text
//      C# version, NAG Copyright 2008
using System;
using NagLibrary;
using System.Globalization;
namespace NagDotNetExamples
{
  public class S14BAE
  {
    static string datafile = "ExampleData/s14bae.d";
    static void Main(String[] args)
    {
      if (args.Length == 1)
      {
        datafile = args[0];
      }
      StartExample();
    }
    public static void StartExample()
    {
      try
      {
        PrintManager.Warning = new PrintManager.MessageLogger(discardmessage);
        DataReader sr = new DataReader(datafile);
        double a,   p,   q,   tol,   x; int ifail;
        Console.WriteLine("s14ba Example Program Results");
        //      Skip heading in data file
        sr.Reset();
        tol = X02.x02aj();
        Console.WriteLine("");
        Console.WriteLine(" {0}", "         a           x           p           q     ifail");
        try
        {
          while (true)
          {
            sr.Reset();
            a = double.Parse(sr.Next(), CultureInfo.InvariantCulture);
            x = double.Parse(sr.Next(), CultureInfo.InvariantCulture);
            // 
            S.s14ba(a, x, tol, out p, out q, out ifail);
            // 
            if (ifail >= 0)
            {
              Console.WriteLine("  {0,12:f4}{1,12:f4}{2,12:f4}{3,12:f4}{4,5}", a, x, p, q, ifail);
            }
            else
            {
              Console.WriteLine("** s14ba failed with ifail = {0,5}", ifail);
            }
          }
        }
        catch
        {
        }
        // 
      }
      catch (Exception e)
      {
        Console.WriteLine(e.Message);
        Console.WriteLine("Exception Raised");
      }
    }
    static void discardmessage(String message)
    {
    }
  }
}