// g01fm Example Program Text // C# version, NAG Copyright 2008 using System; using NagLibrary; using System.Globalization; using System.IO; namespace NagDotNetExamples { public class G01FME { static string datafile = "ExampleData/g01fme.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 p, v, valq; int i, ir; int ifail; Console.WriteLine("g01fm Example Program Results"); // Skip heading in data file sr.Reset(); Console.WriteLine(""); Console.WriteLine(" {0}"," P V IR Quantile "); Console.WriteLine(""); for (i = 1 ; i <= 3 ; i++) { sr.Reset(); p = double.Parse(sr.Next(), CultureInfo.InvariantCulture); v = double.Parse(sr.Next(), CultureInfo.InvariantCulture); ir = int.Parse(sr.Next()); // valq = G01.g01fm(p, v, ir, out ifail); // if ((ifail == 0) || (ifail == 3)) { Console.WriteLine(" {0,5:f2} {1,4:f1} {2,3} {3,10:f4}",p,v,ir,valq); } else { Console.WriteLine("** g01fm failed with ifail = {0,5}", ifail); break; } } } catch (Exception e) { Console.WriteLine(e.Message); Console.WriteLine( "Exception Raised"); } } } }