//      s21bg Example Program Text
//      C# version, NAG Copyright 2008
using System;
using NagLibrary;
using System.Globalization;
namespace NagDotNetExamples
{
  public class S21BGE
  {
    static void Main(String[] args)
    {
      StartExample();
    }
    public static void StartExample()
    {
      try
      {
        PrintManager.Warning = new PrintManager.MessageLogger(discardmessage);
        double dm,   dn,   f,   phi,   pi; int ix;
        int ifail;
        Console.WriteLine("s21bg Example Program Results");
        Console.WriteLine("");
        Console.WriteLine(" {0}", "    dn     phi    dm      s21bg   ifail");
        Console.WriteLine("");
        // 
        pi = X01.x01aa();
        // 
        for (ix = 1; ix <= 3; ix++)
        {
          phi = ix * pi / 6.00e0;
          dm = ix * 0.250e0;
          dn = (Math.Pow((-1.00e0), (ix + 1))) * ix * 0.10e0;
          // 
          f = S.s21bg(dn, phi, dm, out ifail);
          // 
          if (ifail >= 0)
          {
            Console.WriteLine("  {0,7:f2}{1,7:f2}{2,7:f2}{3,12:f4}{4,5}", dn, phi, dm, f, ifail);
          }
          else
          {
            Console.WriteLine("** s21bg failed with ifail = {0,5}", ifail);
          }
        }
        // 
      }
      catch (Exception e)
      {
        Console.WriteLine(e.Message);
        Console.WriteLine("Exception Raised");
      }
    }
    static void discardmessage(String message)
    {
    }
  }
}