//      g01fb Example Program Text
//      C# version, NAG Copyright 2008
using System;
using NagLibrary;
using System.Globalization;
using System.IO;
namespace NagDotNetExamples
{
  public class G01FBE
  {
    static string datafile = "ExampleData/g01fbe.d";
    static void Main(String[] args)
    {
      if (args.Length == 1)
      {
        datafile = args[0];
      }
      StartExample();
    }
    public static void StartExample()
    {
      try
      {
        DataReader sr = new DataReader(datafile);
        double df,  p,   x;  string tail;
        int ifail;
        bool carryon = true;
        Console.WriteLine("g01fb Example Program Results");
        //      Skip heading in data file
        sr.Reset();
        Console.WriteLine("");
        Console.WriteLine(" {0}", "    P        DF      TAIL           X");
        Console.WriteLine("");
        while (carryon)
        {
          try
          {
            sr.Reset();
            p = double.Parse(sr.Next(), CultureInfo.InvariantCulture);
            df = double.Parse(sr.Next(), CultureInfo.InvariantCulture);
            tail = sr.Next();
          }
          catch
          {
            break;
          }
          //
          x = G01.g01fb(tail, p, df, out  ifail);
          //
          if (ifail >= 0)
          {
            if (ifail == 0)
            {
              Console.WriteLine("  {0,8:f3}{1,8:f3}      {2,1}      {3,8:f3}", p, df, tail, x);
            }
            else if (ifail > 0)
            {
              Console.WriteLine("  {0,8:f3}{1,8:f3}      {2,1}      {3,8:f3}{4}{5,1}", p, df, tail, x, " NOTE: ifail = ", ifail);
            }
            continue;
            //
          }
          else
          {
            Console.WriteLine("** g01fb failed with ifail = {0,5}", ifail);
            break;
          }
        }
        //
      }
      catch (Exception e)
      {
        Console.WriteLine(e.Message);
        Console.WriteLine( "Exception Raised");
      }
    }
  }
}