' VB.NET declare statements for NAG Fortran Library DLL Mark 22
' Copyright 2009, Numerical Algorithms Group Ltd, Oxford, UK.

Imports System.Runtime.InteropServices

Module nag_declarations

Const NAGTRUE As Integer = -1
Const NAGFALSE As Integer = 0

<StructLayout(LayoutKind.Sequential)> Structure Complex
  Dim Real_Part As Double
  Dim Imag_Part As Double
End Structure

<StructLayout(LayoutKind.Sequential)> Structure ComplexSingle
  Dim Real_Part As Single
  Dim Imag_Part As Single
End Structure


   Declare Sub A00AAF Lib "FLDLL224M_nag.dll" ( _
   )


   Declare Function A00ACF Lib "FLDLL224M_nag.dll" ( _
   ) as Integer


   Declare Sub A00ADF Lib "FLDLL224M_nag.dll" ( _
    ByVal IMPL As string, ByVal IMPLLength As Integer, _
    ByVal PREC As string, ByVal PRECLength As Integer, _
    ByVal PCODE As string, ByVal PCODELength As Integer, _
    ByRef MKMAJ As Integer, _
    ByRef MKMIN As Integer, _
    ByVal HDWARE As string, ByVal HDWARELength As Integer, _
    ByVal OPSYS As string, ByVal OPSYSLength As Integer, _
    ByVal FCOMP As string, ByVal FCOMPLength As Integer, _
    ByVal VEND As string, ByVal VENDLength As Integer, _
    ByRef LICVAL As Integer _
   )


   Declare Sub A02AAF Lib "FLDLL224M_nag.dll" ( _
    ByRef XR As Double, _
    ByRef XI As Double, _
    ByRef YR As Double, _
    ByRef YI As Double _
   )


   Declare Function A02ABF Lib "FLDLL224M_nag.dll" ( _
    ByRef XR As Double, _
    ByRef XI As Double _
   ) as Double


   Declare Sub A02ACF Lib "FLDLL224M_nag.dll" ( _
    ByRef XR As Double, _
    ByRef XI As Double, _
    ByRef YR As Double, _
    ByRef YI As Double, _
    ByRef ZR As Double, _
    ByRef ZI As Double _
   )


   Declare Sub C02AFF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef N As Integer, _
    ByRef SCAL As Integer, _
    ByRef Z As Double, _
    ByRef W As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C02AGF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef N As Integer, _
    ByRef SCAL As Integer, _
    ByRef Z As Double, _
    ByRef W As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C02AHF Lib "FLDLL224M_nag.dll" ( _
    ByRef AR As Double, _
    ByRef AI As Double, _
    ByRef BR As Double, _
    ByRef BI As Double, _
    ByRef CR As Double, _
    ByRef CI As Double, _
    ByRef ZSM As Double, _
    ByRef ZLG As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C02AJF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef C As Double, _
    ByRef ZSM As Double, _
    ByRef ZLG As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C02AKF Lib "FLDLL224M_nag.dll" ( _
    ByRef U As Double, _
    ByRef R As Double, _
    ByRef S As Double, _
    ByRef T As Double, _
    ByRef ZEROR As Double, _
    ByRef ZEROI As Double, _
    ByRef ERREST As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C02ALF Lib "FLDLL224M_nag.dll" ( _
    ByRef E As Double, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef C As Double, _
    ByRef D As Double, _
    ByRef ZEROR As Double, _
    ByRef ZEROI As Double, _
    ByRef ERREST As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C02AMF Lib "FLDLL224M_nag.dll" ( _
    ByRef U As Complex, _
    ByRef R As Complex, _
    ByRef S As Complex, _
    ByRef T As Complex, _
    ByRef ZEROR As Double, _
    ByRef ZEROI As Double, _
    ByRef ERREST As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C02ANF Lib "FLDLL224M_nag.dll" ( _
    ByRef E As Complex, _
    ByRef A As Complex, _
    ByRef B As Complex, _
    ByRef C As Complex, _
    ByRef D As Complex, _
    ByRef ZEROR As Double, _
    ByRef ZEROI As Double, _
    ByRef ERREST As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Function C05ADF_F_DELEGATE( _
    ByRef XX As Double _
  ) as Double

   Declare Sub C05ADF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef EPS As Double, _
    ByRef ETA As Double, _
    ByVal F As C05ADF_F_DELEGATE, _
    ByRef X As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Function C05AGF_F_DELEGATE( _
    ByRef XX As Double _
  ) as Double

   Declare Sub C05AGF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef H As Double, _
    ByRef EPS As Double, _
    ByRef ETA As Double, _
    ByVal F As C05AGF_F_DELEGATE, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Function C05AJF_F_DELEGATE( _
    ByRef XX As Double _
  ) as Double

   Declare Sub C05AJF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef EPS As Double, _
    ByRef ETA As Double, _
    ByVal F As C05AJF_F_DELEGATE, _
    ByRef NFMAX As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C05AVF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef FX As Double, _
    ByRef H As Double, _
    ByRef BOUNDL As Double, _
    ByRef BOUNDU As Double, _
    ByRef Y As Double, _
    ByRef C As Double, _
    ByRef IND As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C05AXF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef FX As Double, _
    ByRef TOL As Double, _
    ByRef IR As Integer, _
    ByRef SCAL As Double, _
    ByRef C As Double, _
    ByRef IND As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C05AZF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef FX As Double, _
    ByRef TOLX As Double, _
    ByRef IR As Integer, _
    ByRef C As Double, _
    ByRef IND As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Function C05BAF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef BRANCH As Integer, _
    ByRef OFFSET As Integer, _
    ByRef IFAIL As Integer _
   ) as Double


  Delegate Sub C05NBF_FCN_DELEGATE( _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByRef IFLAG As Integer _
  )

   Declare Sub C05NBF Lib "FLDLL224M_nag.dll" ( _
    ByVal FCN As C05NBF_FCN_DELEGATE, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef FVEC As Double, _
    ByRef XTOL As Double, _
    ByRef WA As Double, _
    ByRef LWA As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub C05NCF_FCN_DELEGATE( _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByRef IFLAG As Integer _
  )

   Declare Sub C05NCF Lib "FLDLL224M_nag.dll" ( _
    ByVal FCN As C05NCF_FCN_DELEGATE, ByRef N As Integer, ByRef X As Double, _
    ByRef FVEC As Double, ByRef XTOL As Double, ByRef MAXFEV As Integer, _
    ByRef ML As Integer, ByRef MU As Integer, ByRef EPSFCN As Double, _
    ByRef DIAG As Double, ByRef MODE As Integer, ByRef FACTOR As Double, _
    ByRef NPRINT As Integer, ByRef NFEV As Integer, ByRef FJAC As Double, _
    ByRef LDFJAC As Integer, ByRef R As Double, ByRef LR As Integer, _
    ByRef QTF As Double, ByRef W As Double, ByRef IFAIL As Integer _
   )


   Declare Sub C05NDF Lib "FLDLL224M_nag.dll" ( _
    ByRef IREVCM As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef FVEC As Double, _
    ByRef XTOL As Double, _
    ByRef ML As Integer, _
    ByRef MU As Integer, _
    ByRef EPSFCN As Double, _
    ByRef DIAG As Double, _
    ByRef MODE As Integer, _
    ByRef FACTOR As Double, _
    ByRef FJAC As Double, _
    ByRef LDFJAC As Integer, _
    ByRef R As Double, _
    ByRef LR As Integer, _
    ByRef QTF As Double, _
    ByRef W As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub C05PBA_FCN_DELEGATE( _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByRef IFLAG As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub C05PBA Lib "FLDLL224M_nag.dll" ( _
    ByVal FCN As C05PBF_FCN_DELEGATE, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef FVEC As Double, _
    ByRef FJAC As Double, _
    ByRef LDFJAC As Integer, _
    ByRef XTOL As Double, _
    ByRef WA As Double, _
    ByRef LWA As Integer, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )

  Delegate Sub C05PBF_FCN_DELEGATE( _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByRef IFLAG As Integer _
  )

   Declare Sub C05PBF Lib "FLDLL224M_nag.dll" ( _
    ByVal FCN As C05PBF_FCN_DELEGATE, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef FVEC As Double, _
    ByRef FJAC As Double, _
    ByRef LDFJAC As Integer, _
    ByRef XTOL As Double, _
    ByRef WA As Double, _
    ByRef LWA As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub C05PCA_FCN_DELEGATE( _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByRef IFLAG As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub C05PCA Lib "FLDLL224M_nag.dll" ( _
    ByVal FCN As C05PCF_FCN_DELEGATE, ByRef N As Integer, ByRef X As Double, _
    ByRef FVEC As Double, ByRef FJAC As Double, ByRef LDFJAC As Integer, _
    ByRef XTOL As Double, ByRef MAXFEV As Integer, ByRef DIAG As Double, _
    ByRef MODE As Integer, ByRef FACTOR As Double, ByRef NPRINT As Integer, _
    ByRef NFEV As Integer, ByRef NJEV As Integer, ByRef R As Double, _
    ByRef LR As Integer, ByRef QTF As Double, ByRef W As Double, _
    ByRef IUSER As Integer, ByRef RUSER As Double, ByRef IFAIL As Integer _
   )

  Delegate Sub C05PCF_FCN_DELEGATE( _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByRef IFLAG As Integer _
  )

   Declare Sub C05PCF Lib "FLDLL224M_nag.dll" ( _
    ByVal FCN As C05PCF_FCN_DELEGATE, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef FVEC As Double, _
    ByRef FJAC As Double, _
    ByRef LDFJAC As Integer, _
    ByRef XTOL As Double, _
    ByRef MAXFEV As Integer, _
    ByRef DIAG As Double, _
    ByRef MODE As Integer, _
    ByRef FACTOR As Double, _
    ByRef NPRINT As Integer, _
    ByRef NFEV As Integer, _
    ByRef NJEV As Integer, _
    ByRef R As Double, _
    ByRef LR As Integer, _
    ByRef QTF As Double, _
    ByRef W As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C05PDA Lib "FLDLL224M_nag.dll" ( _
    ByRef IREVCM As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef FVEC As Double, _
    ByRef FJAC As Double, _
    ByRef LDFJAC As Integer, _
    ByRef XTOL As Double, _
    ByRef DIAG As Double, _
    ByRef MODE As Integer, _
    ByRef FACTOR As Double, _
    ByRef R As Double, _
    ByRef LR As Integer, _
    ByRef QTF As Double, _
    ByRef W As Double, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef IFAIL As Integer _
   )

   Declare Sub C05PDF Lib "FLDLL224M_nag.dll" ( _
    ByRef IREVCM As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef FVEC As Double, _
    ByRef FJAC As Double, _
    ByRef LDFJAC As Integer, _
    ByRef XTOL As Double, _
    ByRef DIAG As Double, _
    ByRef MODE As Integer, _
    ByRef FACTOR As Double, _
    ByRef R As Double, _
    ByRef LR As Integer, _
    ByRef QTF As Double, _
    ByRef W As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C05ZAF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef FVEC As Double, _
    ByRef FJAC As Double, _
    ByRef LDFJAC As Integer, _
    ByRef XP As Double, _
    ByRef FVECP As Double, _
    ByRef MODE As Integer, _
    ByRef ERR As Double _
   )


   Declare Sub C06BAF Lib "FLDLL224M_nag.dll" ( _
    ByRef SEQN As Double, _
    ByRef NCALL As Integer, _
    ByRef RESULT As Double, _
    ByRef ABSERR As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Function C06DBF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef C As Double, _
    ByRef N As Integer, _
    ByRef S As Integer _
   ) as Double


   Declare Sub C06EAF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef N As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06EBF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef N As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06ECF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef N As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06EKF Lib "FLDLL224M_nag.dll" ( _
    ByRef JOB As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef N As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06FAF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef N As Integer, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06FBF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef N As Integer, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06FCF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef N As Integer, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06FFF Lib "FLDLL224M_nag.dll" ( _
    ByRef NDIM As Integer, _
    ByRef L As Integer, _
    ByRef ND As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06FJF Lib "FLDLL224M_nag.dll" ( _
    ByRef NDIM As Integer, _
    ByRef ND As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06FKF Lib "FLDLL224M_nag.dll" ( _
    ByRef JOB As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef N As Integer, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06FPF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByVal INIT As string, ByVal INITLength As Integer, _
    ByRef TRIG As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06FQF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByVal INIT As string, ByVal INITLength As Integer, _
    ByRef TRIG As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06FRF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByVal INIT As string, ByVal INITLength As Integer, _
    ByRef TRIG As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06FUF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByVal INIT As string, ByVal INITLength As Integer, _
    ByRef TRIGM As Double, _
    ByRef TRIGN As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06FXF Lib "FLDLL224M_nag.dll" ( _
    ByRef N1 As Integer, _
    ByRef N2 As Integer, _
    ByRef N3 As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByVal INIT As string, ByVal INITLength As Integer, _
    ByRef TRIGN1 As Double, _
    ByRef TRIGN2 As Double, _
    ByRef TRIGN3 As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06GBF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef N As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06GCF Lib "FLDLL224M_nag.dll" ( _
    ByRef Y As Double, _
    ByRef N As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06GQF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06GSF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef U As Double, _
    ByRef V As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06HAF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByVal INIT As string, ByVal INITLength As Integer, _
    ByRef TRIG As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06HBF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByVal INIT As string, ByVal INITLength As Integer, _
    ByRef TRIG As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06HCF Lib "FLDLL224M_nag.dll" ( _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByVal INIT As string, ByVal INITLength As Integer, _
    ByRef TRIG As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06HDF Lib "FLDLL224M_nag.dll" ( _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByVal INIT As string, ByVal INITLength As Integer, _
    ByRef TRIG As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub C06LAF_FUN_DELEGATE( _
    ByRef PR As Double, _
    ByRef PI As Double, _
    ByRef FR As Double, _
    ByRef FI As Double _
  )

   Declare Sub C06LAF Lib "FLDLL224M_nag.dll" ( _
    ByVal FUN As C06LAF_FUN_DELEGATE, _
    ByRef N As Integer, _
    ByRef T As Double, _
    ByRef VALINV As Double, _
    ByRef ERREST As Double, _
    ByRef RELERR As Double, _
    ByRef ALPHAB As Double, _
    ByRef TFAC As Double, _
    ByRef MXTERM As Integer, _
    ByRef NTERMS As Integer, _
    ByRef NA As Integer, _
    ByRef ALOW As Double, _
    ByRef AHIGH As Double, _
    ByRef NFEVAL As Integer, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Function C06LBF_F_DELEGATE( _
    ByRef S As Complex _
  ) as Complex

   Declare Sub C06LBF Lib "FLDLL224M_nag.dll" ( _
    ByVal F As C06LBF_F_DELEGATE, _
    ByRef SIGMA0 As Double, _
    ByRef SIGMA As Double, _
    ByRef B As Double, _
    ByRef EPSTOL As Double, _
    ByRef MMAX As Integer, _
    ByRef M As Integer, _
    ByRef ACOEF As Double, _
    ByRef ERRVEC As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06LCF Lib "FLDLL224M_nag.dll" ( _
    ByRef T As Double, _
    ByRef SIGMA As Double, _
    ByRef B As Double, _
    ByRef M As Integer, _
    ByRef ACOEF As Double, _
    ByRef ERRVEC As Double, _
    ByRef FINV As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06PAF Lib "FLDLL224M_nag.dll" ( _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef X As Double, _
    ByRef N As Integer, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06PCF Lib "FLDLL224M_nag.dll" ( _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef X As Complex, _
    ByRef N As Integer, _
    ByRef WORK As Complex, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06PFF Lib "FLDLL224M_nag.dll" ( _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef NDIM As Integer, _
    ByRef L As Integer, _
    ByRef ND As Integer, _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06PJF Lib "FLDLL224M_nag.dll" ( _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef NDIM As Integer, _
    ByRef ND As Integer, _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06PKF Lib "FLDLL224M_nag.dll" ( _
    ByRef JOB As Integer, _
    ByRef X As Complex, _
    ByRef Y As Complex, _
    ByRef N As Integer, _
    ByRef WORK As Complex, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06PPF Lib "FLDLL224M_nag.dll" ( _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06PQF Lib "FLDLL224M_nag.dll" ( _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef N As Integer, _
    ByRef M As Integer, _
    ByRef X As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06PRF Lib "FLDLL224M_nag.dll" ( _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef WORK As Complex, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06PSF Lib "FLDLL224M_nag.dll" ( _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef N As Integer, _
    ByRef M As Integer, _
    ByRef X As Complex, _
    ByRef WORK As Complex, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06PUF Lib "FLDLL224M_nag.dll" ( _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef WORK As Complex, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06PXF Lib "FLDLL224M_nag.dll" ( _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef N1 As Integer, _
    ByRef N2 As Integer, _
    ByRef N3 As Integer, _
    ByRef X As Complex, _
    ByRef WORK As Complex, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06RAF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06RBF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06RCF Lib "FLDLL224M_nag.dll" ( _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C06RDF Lib "FLDLL224M_nag.dll" ( _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C09AAF Lib "FLDLL224M_nag.dll" ( _
    ByVal WAVNAM As string, ByVal WAVNAMLength As Integer, _
    ByVal WTRANS As string, ByVal WTRANSLength As Integer, _
    ByVal MODE As string, ByVal MODELength As Integer, _
    ByRef N As Integer, _
    ByRef NWL As Integer, _
    ByRef NF As Integer, _
    ByRef NWC As Integer, _
    ByRef ICOMM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C09CAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef LENC As Integer, _
    ByRef CA As Double, _
    ByRef CD As Double, _
    ByRef ICOMM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C09CBF Lib "FLDLL224M_nag.dll" ( _
    ByRef LENC As Integer, _
    ByRef CA As Double, _
    ByRef CD As Double, _
    ByRef N As Integer, _
    ByRef Y As Double, _
    ByRef ICOMM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C09CCF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef LENC As Integer, _
    ByRef C As Double, _
    ByRef NWL As Integer, _
    ByRef DWTLEV As Integer, _
    ByRef ICOMM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub C09CDF Lib "FLDLL224M_nag.dll" ( _
    ByRef NWL As Integer, _
    ByRef LENC As Integer, _
    ByRef C As Double, _
    ByRef N As Integer, _
    ByRef Y As Double, _
    ByRef ICOMM As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01AHF_F_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Function D01AHF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef EPSR As Double, _
    ByRef NPTS As Integer, _
    ByRef RELERR As Double, _
    ByVal F As D01AHF_F_DELEGATE, _
    ByRef NLIMIT As Integer, _
    ByRef IFAIL As Integer _
   ) as Double


  Delegate Function D01AJF_F_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Sub D01AJF Lib "FLDLL224M_nag.dll" ( _
    ByVal F As D01AJF_F_DELEGATE, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef EPSABS As Double, _
    ByRef EPSREL As Double, _
    ByRef RESULT As Double, _
    ByRef ABSERR As Double, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01AKF_F_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Sub D01AKF Lib "FLDLL224M_nag.dll" ( _
    ByVal F As D01AKF_F_DELEGATE, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef EPSABS As Double, _
    ByRef EPSREL As Double, _
    ByRef RESULT As Double, _
    ByRef ABSERR As Double, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01ALF_F_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Sub D01ALF Lib "FLDLL224M_nag.dll" ( _
    ByVal F As D01ALF_F_DELEGATE, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef NPTS As Integer, _
    ByRef POINTS As Double, _
    ByRef EPSABS As Double, _
    ByRef EPSREL As Double, _
    ByRef RESULT As Double, _
    ByRef ABSERR As Double, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01AMF_F_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Sub D01AMF Lib "FLDLL224M_nag.dll" ( _
    ByVal F As D01AMF_F_DELEGATE, _
    ByRef BOUND As Double, _
    ByRef INF As Integer, _
    ByRef EPSABS As Double, _
    ByRef EPSREL As Double, _
    ByRef RESULT As Double, _
    ByRef ABSERR As Double, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01ANF_G_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Sub D01ANF Lib "FLDLL224M_nag.dll" ( _
    ByVal G As D01ANF_G_DELEGATE, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef OMEGA As Double, _
    ByRef KEY As Integer, _
    ByRef EPSABS As Double, _
    ByRef EPSREL As Double, _
    ByRef RESULT As Double, _
    ByRef ABSERR As Double, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01APF_G_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Sub D01APF Lib "FLDLL224M_nag.dll" ( _
    ByVal G As D01APF_G_DELEGATE, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef ALFA As Double, _
    ByRef BETA As Double, _
    ByRef KEY As Integer, _
    ByRef EPSABS As Double, _
    ByRef EPSREL As Double, _
    ByRef RESULT As Double, _
    ByRef ABSERR As Double, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01AQF_G_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Sub D01AQF Lib "FLDLL224M_nag.dll" ( _
    ByVal G As D01AQF_G_DELEGATE, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef C As Double, _
    ByRef EPSABS As Double, _
    ByRef EPSREL As Double, _
    ByRef RESULT As Double, _
    ByRef ABSERR As Double, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01ARF_FUN_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Sub D01ARF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef B As Double, _
    ByVal FUN As D01ARF_FUN_DELEGATE, _
    ByRef RELACC As Double, _
    ByRef ABSACC As Double, _
    ByRef MAXRUL As Integer, _
    ByRef IPARM As Integer, _
    ByRef ACC As Double, _
    ByRef ANS As Double, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01ASF_G_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Sub D01ASF Lib "FLDLL224M_nag.dll" ( _
    ByVal G As D01ASF_G_DELEGATE, _
    ByRef A As Double, _
    ByRef OMEGA As Double, _
    ByRef KEY As Integer, _
    ByRef EPSABS As Double, _
    ByRef RESULT As Double, _
    ByRef ABSERR As Double, _
    ByRef LIMLST As Integer, _
    ByRef LST As Integer, _
    ByRef ERLST As Double, _
    ByRef RSLST As Double, _
    ByRef IERLST As Integer, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D01ATF_F_DELEGATE( _
    ByVal X_rptr As IntPtr, _
    ByVal FV_rptr As IntPtr, _
    ByRef N As Integer _
  )

   Declare Sub D01ATF Lib "FLDLL224M_nag.dll" ( _
    ByVal F As D01ATF_F_DELEGATE, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef EPSABS As Double, _
    ByRef EPSREL As Double, _
    ByRef RESULT As Double, _
    ByRef ABSERR As Double, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D01AUF_F_DELEGATE( _
    ByVal X_rptr As IntPtr, _
    ByVal FV_rptr As IntPtr, _
    ByRef N As Integer _
  )

   Declare Sub D01AUF Lib "FLDLL224M_nag.dll" ( _
    ByVal F As D01AUF_F_DELEGATE, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef KEY As Integer, _
    ByRef EPSABS As Double, _
    ByRef EPSREL As Double, _
    ByRef RESULT As Double, _
    ByRef ABSERR As Double, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D01BAF_D01XXX_DELEGATE( _
    ByRef IFLAG As Integer _
  )

   Declare Sub D01BAW Lib "FLDLL224M_nag.dll" ( _
    ByRef IFLAG As Integer _
  )

   Declare Sub D01BAX Lib "FLDLL224M_nag.dll" ( _
    ByRef IFLAG As Integer _
  )

   Declare Sub D01BAY Lib "FLDLL224M_nag.dll" ( _
    ByRef IFLAG As Integer _
  )

   Declare Sub D01BAZ Lib "FLDLL224M_nag.dll" ( _
    ByRef IFLAG As Integer _
  )

  Delegate Function D01BAF_FUN_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Function D01BAF Lib "FLDLL224M_nag.dll" ( _
    ByVal D01XXX As D01BAF_D01XXX_DELEGATE, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef N As Integer, _
    ByVal FUN As D01BAF_FUN_DELEGATE, _
    ByRef IFAIL As Integer _
   ) as Double


  Delegate Sub D01BBF_D01XXX_DELEGATE( _
    ByRef IFLAG As Integer _
  )





   Declare Sub D01BBF Lib "FLDLL224M_nag.dll" ( _
    ByVal D01XXX As D01BBF_D01XXX_DELEGATE, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef ITYPE As Integer, _
    ByRef N As Integer, _
    ByRef WEIGHT As Double, _
    ByRef ABSCIS As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D01BCF Lib "FLDLL224M_nag.dll" ( _
    ByRef ITYPE As Integer, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef C As Double, _
    ByRef D As Double, _
    ByRef N As Integer, _
    ByRef WEIGHT As Double, _
    ByRef ABSCIS As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01BDF_F_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Sub D01BDF Lib "FLDLL224M_nag.dll" ( _
    ByVal F As D01BDF_F_DELEGATE, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef EPSABS As Double, _
    ByRef EPSREL As Double, _
    ByRef RESULT As Double, _
    ByRef ABSERR As Double _
   )


  Delegate Function D01DAF_PHI1_DELEGATE( _
    ByRef Y As Double _
  ) as Double

  Delegate Function D01DAF_PHI2_DELEGATE( _
    ByRef Y As Double _
  ) as Double

  Delegate Function D01DAF_F_DELEGATE( _
    ByRef X As Double, _
    ByRef Y As Double _
  ) as Double

   Declare Sub D01DAF Lib "FLDLL224M_nag.dll" ( _
    ByRef YA As Double, _
    ByRef YB As Double, _
    ByVal PHI1 As D01DAF_PHI1_DELEGATE, _
    ByVal PHI2 As D01DAF_PHI2_DELEGATE, _
    ByVal F As D01DAF_F_DELEGATE, _
    ByRef ABSACC As Double, _
    ByRef ANS As Double, _
    ByRef NPTS As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D01EAF_FUNSUB_DELEGATE( _
    ByRef NDIM As Integer, _
    ByVal Z_rptr As IntPtr, _
    ByRef NFUN As Integer, _
    ByVal F_rptr As IntPtr _
  )

   Declare Sub D01EAF Lib "FLDLL224M_nag.dll" ( _
    ByRef NDIM As Integer, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef MINCLS As Integer, _
    ByRef MAXCLS As Integer, _
    ByRef NFUN As Integer, _
    ByVal FUNSUB As D01EAF_FUNSUB_DELEGATE, _
    ByRef ABSREQ As Double, _
    ByRef RELREQ As Double, _
    ByRef LENWRK As Integer, _
    ByRef WRKSTR As Double, _
    ByRef FINEST As Double, _
    ByRef ABSEST As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01FBF_FUN_DELEGATE( _
    ByRef NDIM As Integer, _
    ByVal X_rptr As IntPtr _
  ) as Double

   Declare Function D01FBF Lib "FLDLL224M_nag.dll" ( _
    ByRef NDIM As Integer, _
    ByRef NPTVEC As Integer, _
    ByRef LWA As Integer, _
    ByRef WEIGHT As Double, _
    ByRef ABSCIS As Double, _
    ByVal FUN As D01FBF_FUN_DELEGATE, _
    ByRef IFAIL As Integer _
   ) as Double


  Delegate Function D01FCF_FUNCTN_DELEGATE( _
    ByRef NDIM As Integer, _
    ByVal Z_rptr As IntPtr _
  ) as Double

   Declare Sub D01FCF Lib "FLDLL224M_nag.dll" ( _
    ByRef NDIM As Integer, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef MINPTS As Integer, _
    ByRef MAXPTS As Integer, _
    ByVal FUNCTN As D01FCF_FUNCTN_DELEGATE, _
    ByRef EPS As Double, _
    ByRef ACC As Double, _
    ByRef LENWRK As Integer, _
    ByRef WRKSTR As Double, _
    ByRef FINVAL As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01FDF_F_DELEGATE( _
    ByRef NDIM As Integer, _
    ByVal X_rptr As IntPtr _
  ) as Double

  Delegate Sub D01FDF_REGION_DELEGATE( _
    ByRef NDIM As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef J As Integer, _
    ByRef C As Double, _
    ByRef D As Double _
  )

   Declare Sub D01FDV Lib "FLDLL224M_nag.dll" ( _
    ByRef NDIM As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef J As Integer, _
    ByRef C As Double, _
    ByRef D As Double _
  )

   Declare Sub D01FDF Lib "FLDLL224M_nag.dll" ( _
    ByRef NDIM As Integer, _
    ByVal F As D01FDF_F_DELEGATE, _
    ByRef SIGMA As Double, _
    ByVal REGION As D01FDF_REGION_DELEGATE, _
    ByRef LIMIT As Integer, _
    ByRef R0 As Double, _
    ByRef U As Double, _
    ByRef RESULT As Double, _
    ByRef NCALLS As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D01GAF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef N As Integer, _
    ByRef ANS As Double, _
    ByRef ER As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01GBF_FUNCTN_DELEGATE( _
    ByRef NDIM As Integer, _
    ByVal X_rptr As IntPtr _
  ) as Double

   Declare Sub D01GBF Lib "FLDLL224M_nag.dll" ( _
    ByRef NDIM As Integer, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef MINCLS As Integer, _
    ByRef MAXCLS As Integer, _
    ByVal FUNCTN As D01GBF_FUNCTN_DELEGATE, _
    ByRef EPS As Double, _
    ByRef ACC As Double, _
    ByRef LENWRK As Integer, _
    ByRef WRKSTR As Double, _
    ByRef FINEST As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01GCF_F_DELEGATE( _
    ByRef NDIM As Integer, _
    ByVal X_rptr As IntPtr _
  ) as Double

  Delegate Sub D01GCF_REGION_DELEGATE( _
    ByRef NDIM As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef J As Integer, _
    ByRef C As Double, _
    ByRef D As Double _
  )

   Declare Sub D01GCF Lib "FLDLL224M_nag.dll" ( _
    ByRef NDIM As Integer, _
    ByVal F As D01GCF_F_DELEGATE, _
    ByVal REGION As D01GCF_REGION_DELEGATE, _
    ByRef NPTS As Integer, _
    ByRef VK As Double, _
    ByRef NRAND As Integer, _
    ByRef ITRANS As Integer, _
    ByRef RES As Double, _
    ByRef ERR As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D01GDF_VECFUN_DELEGATE( _
    ByRef NDIM As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal FV_rptr As IntPtr, _
    ByRef M As Integer _
  )

  Delegate Sub D01GDF_VECREG_DELEGATE( _
    ByRef NDIM As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef J As Integer, _
    ByVal C_rptr As IntPtr, _
    ByVal D_rptr As IntPtr, _
    ByRef M As Integer _
  )

   Declare Sub D01GDF Lib "FLDLL224M_nag.dll" ( _
    ByRef NDIM As Integer, _
    ByVal VECFUN As D01GDF_VECFUN_DELEGATE, _
    ByVal VECREG As D01GDF_VECREG_DELEGATE, _
    ByRef NPTS As Integer, _
    ByRef VK As Double, _
    ByRef NRAND As Integer, _
    ByRef ITRANS As Integer, _
    ByRef RES As Double, _
    ByRef ERR As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D01GYF Lib "FLDLL224M_nag.dll" ( _
    ByRef NDIM As Integer, _
    ByRef NPTS As Integer, _
    ByRef VK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D01GZF Lib "FLDLL224M_nag.dll" ( _
    ByRef NDIM As Integer, _
    ByRef NP1 As Integer, _
    ByRef NP2 As Integer, _
    ByRef VK As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01JAF_F_DELEGATE( _
    ByRef NDIM As Integer, _
    ByVal X_rptr As IntPtr _
  ) as Double

   Declare Sub D01JAF Lib "FLDLL224M_nag.dll" ( _
    ByVal F As D01JAF_F_DELEGATE, _
    ByRef NDIM As Integer, _
    ByRef RADIUS As Double, _
    ByRef EPSA As Double, _
    ByRef EPSR As Double, _
    ByRef METHOD As Integer, _
    ByRef ICOORD As Integer, _
    ByRef RESULT As Double, _
    ByRef ESTERR As Double, _
    ByRef NEVALS As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D01PAF_FUNCTN_DELEGATE( _
    ByRef NDIM As Integer, _
    ByVal X_rptr As IntPtr _
  ) as Double

   Declare Sub D01PAF Lib "FLDLL224M_nag.dll" ( _
    ByRef NDIM As Integer, _
    ByRef VERT As Double, _
    ByRef LDVERT As Integer, _
    ByRef SDVERT As Integer, _
    ByVal FUNCTN As D01PAF_FUNCTN_DELEGATE, _
    ByRef MINORD As Integer, _
    ByRef MAXORD As Integer, _
    ByRef FINVLS As Double, _
    ByRef ESTERR As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02AGF_AUX_DELEGATE( _
    ByVal F_rptr As IntPtr, _
    ByVal Y_rptr As IntPtr, _
    ByRef X As Double, _
    ByVal PARAM_rptr As IntPtr _
  )

  Delegate Sub D02AGF_BCAUX_DELEGATE( _
    ByVal G0_rptr As IntPtr, _
    ByVal G1_rptr As IntPtr, _
    ByVal PARAM_rptr As IntPtr _
  )

  Delegate Sub D02AGF_RAAUX_DELEGATE( _
    ByRef X0 As Double, _
    ByRef X1 As Double, _
    ByRef R As Double, _
    ByVal PARAM_rptr As IntPtr _
  )

  Delegate Sub D02AGF_PRSOL_DELEGATE( _
    ByVal PARAM_rptr As IntPtr, _
    ByRef RES As Double, _
    ByRef N1 As Integer, _
    ByVal ERR_rptr As IntPtr _
  )

   Declare Sub D02AGF Lib "FLDLL224M_nag.dll" ( _
    ByRef H As Double, _
    ByRef E As Double, _
    ByRef PARERR As Double, _
    ByRef PARAM As Double, _
    ByRef C As Double, _
    ByRef N As Integer, _
    ByRef N1 As Integer, _
    ByRef M1 As Integer, _
    ByVal AUX As D02AGF_AUX_DELEGATE, _
    ByVal BCAUX As D02AGF_BCAUX_DELEGATE, _
    ByVal RAAUX As D02AGF_RAAUX_DELEGATE, _
    ByVal PRSOL As D02AGF_PRSOL_DELEGATE, _
    ByRef MAT As Double, _
    ByRef COPY As Double, _
    ByRef WSPACE As Double, _
    ByRef WSPAC1 As Double, _
    ByRef WSPAC2 As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02BGF_FCN_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr _
  )

   Declare Sub D02BGF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef XEND As Double, _
    ByRef N As Integer, _
    ByRef Y As Double, _
    ByRef TOL As Double, _
    ByRef HMAX As Double, _
    ByRef M As Integer, _
    ByRef VAL As Double, _
    ByVal FCN As D02BGF_FCN_DELEGATE, _
    ByRef W As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02BHF_FCN_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr _
  )

  Delegate Function D02BHF_G_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr _
  ) as Double

   Declare Sub D02BHF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef XEND As Double, _
    ByRef N As Integer, _
    ByRef Y As Double, _
    ByRef TOL As Double, _
    ByRef IRELAB As Integer, _
    ByRef HMAX As Double, _
    ByVal FCN As D02BHF_FCN_DELEGATE, _
    ByVal G As D02BHF_G_DELEGATE, _
    ByRef W As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02BJF_FCN_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr _
  )

  Delegate Sub D02BJF_OUTPUT_DELEGATE( _
    ByRef XSOL As Double, _
    ByVal Y_rptr As IntPtr _
  )

   Declare Sub D02BJX Lib "FLDLL224M_nag.dll" ( _
    ByRef XSOL As Double, _
    ByVal Y_rptr As IntPtr _
  )

  Delegate Function D02BJF_G_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr _
  ) as Double

   Declare Function D02BJW Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr _
  ) as Double

   Declare Sub D02BJF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef XEND As Double, _
    ByRef N As Integer, _
    ByRef Y As Double, _
    ByVal FCN As D02BJF_FCN_DELEGATE, _
    ByRef TOL As Double, _
    ByVal RELABS As string, ByVal RELABSLength As Integer, _
    ByVal OUTPUT As D02BJF_OUTPUT_DELEGATE, _
    ByVal G As D02BJF_G_DELEGATE, _
    ByRef W As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02CJF_FCN_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr _
  )

  Delegate Sub D02CJF_OUTPUT_DELEGATE( _
    ByRef XSOL As Double, _
    ByVal Y_rptr As IntPtr _
  )

   Declare Sub D02CJX Lib "FLDLL224M_nag.dll" ( _
    ByRef XSOL As Double, _
    ByVal Y_rptr As IntPtr _
  )

  Delegate Function D02CJF_G_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr _
  ) as Double

   Declare Function D02CJW Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr _
  ) as Double

   Declare Sub D02CJF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef XEND As Double, _
    ByRef N As Integer, _
    ByRef Y As Double, _
    ByVal FCN As D02CJF_FCN_DELEGATE, _
    ByRef TOL As Double, _
    ByVal RELABS As string, ByVal RELABSLength As Integer, _
    ByVal OUTPUT As D02CJF_OUTPUT_DELEGATE, _
    ByVal G As D02CJF_G_DELEGATE, _
    ByRef W As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02EJF_FCN_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr _
  )

  Delegate Sub D02EJF_PEDERV_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal PW_rptr As IntPtr _
  )

   Declare Sub D02EJY Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal PW_rptr As IntPtr _
  )

  Delegate Sub D02EJF_OUTPUT_DELEGATE( _
    ByRef XSOL As Double, _
    ByVal Y_rptr As IntPtr _
  )

   Declare Sub D02EJX Lib "FLDLL224M_nag.dll" ( _
    ByRef XSOL As Double, _
    ByVal Y_rptr As IntPtr _
  )

  Delegate Function D02EJF_G_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr _
  ) as Double

   Declare Function D02EJW Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr _
  ) as Double

   Declare Sub D02EJF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef XEND As Double, _
    ByRef N As Integer, _
    ByRef Y As Double, _
    ByVal FCN As D02EJF_FCN_DELEGATE, _
    ByVal PEDERV As D02EJF_PEDERV_DELEGATE, _
    ByRef TOL As Double, _
    ByVal RELABS As string, ByVal RELABSLength As Integer, _
    ByVal OUTPUT As D02EJF_OUTPUT_DELEGATE, _
    ByVal G As D02EJF_G_DELEGATE, _
    ByRef W As Double, _
    ByRef IW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02GAF_FCN_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr _
  )

   Declare Sub D02GAF Lib "FLDLL224M_nag.dll" ( _
    ByRef U As Double, _
    ByRef V As Double, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef TOL As Double, _
    ByVal FCN As D02GAF_FCN_DELEGATE, _
    ByRef MNP As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef NP As Integer, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02GBF_FCNF_DELEGATE( _
    ByRef X As Double, _
    ByVal F_rptr As IntPtr _
  )

  Delegate Sub D02GBF_FCNG_DELEGATE( _
    ByRef X As Double, _
    ByVal G_rptr As IntPtr _
  )

   Declare Sub D02GBF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef N As Integer, _
    ByRef TOL As Double, _
    ByVal FCNF As D02GBF_FCNF_DELEGATE, _
    ByVal FCNG As D02GBF_FCNG_DELEGATE, _
    ByRef C As Double, _
    ByRef D As Double, _
    ByRef GAM As Double, _
    ByRef MNP As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef NP As Integer, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02HAF_FCN_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr _
  )

   Declare Sub D02HAF Lib "FLDLL224M_nag.dll" ( _
    ByRef U As Double, _
    ByRef V As Double, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef TOL As Double, _
    ByVal FCN As D02HAF_FCN_DELEGATE, _
    ByRef SOLN As Double, _
    ByRef M1 As Integer, _
    ByRef W As Double, _
    ByRef SDW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02HBF_FCN_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByVal P_rptr As IntPtr _
  )

  Delegate Sub D02HBF_BC_DELEGATE( _
    ByVal G1_rptr As IntPtr, _
    ByVal G2_rptr As IntPtr, _
    ByVal P_rptr As IntPtr _
  )

  Delegate Sub D02HBF_RANGE_DELEGATE( _
    ByRef A As Double, _
    ByRef B As Double, _
    ByVal P_rptr As IntPtr _
  )

   Declare Sub D02HBF Lib "FLDLL224M_nag.dll" ( _
    ByRef P As Double, _
    ByRef N1 As Integer, _
    ByRef PE As Double, _
    ByRef E As Double, _
    ByRef N As Integer, _
    ByRef SOLN As Double, _
    ByRef M1 As Integer, _
    ByVal FCN As D02HBF_FCN_DELEGATE, _
    ByVal BC As D02HBF_BC_DELEGATE, _
    ByVal RANGE As D02HBF_RANGE_DELEGATE, _
    ByRef W As Double, _
    ByRef SDW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D02JAF_CF_DELEGATE( _
    ByRef J As Integer, _
    ByRef X As Double _
  ) as Double

  Delegate Sub D02JAF_BC_DELEGATE( _
    ByRef I As Integer, _
    ByRef J As Integer, _
    ByRef RHS As Double _
  )

   Declare Sub D02JAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByVal CF As D02JAF_CF_DELEGATE, _
    ByVal BC As D02JAF_BC_DELEGATE, _
    ByRef X0 As Double, _
    ByRef X1 As Double, _
    ByRef K1 As Integer, _
    ByRef KP As Integer, _
    ByRef C As Double, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D02JBF_CF_DELEGATE( _
    ByRef I As Integer, _
    ByRef J As Integer, _
    ByRef X As Double _
  ) as Double

  Delegate Sub D02JBF_BC_DELEGATE( _
    ByRef I As Integer, _
    ByRef J As Integer, _
    ByRef RHS As Double _
  )

   Declare Sub D02JBF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByVal CF As D02JBF_CF_DELEGATE, _
    ByVal BC As D02JBF_BC_DELEGATE, _
    ByRef X0 As Double, _
    ByRef X1 As Double, _
    ByRef K1 As Integer, _
    ByRef KP As Integer, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02KAF_COEFFN_DELEGATE( _
    ByRef P As Double, _
    ByRef Q As Double, _
    ByRef DQDL As Double, _
    ByRef X As Double, _
    ByRef ELAM As Double, _
    ByRef JINT As Integer _
  )

  Delegate Sub D02KAF_MONIT_DELEGATE( _
    ByRef NIT As Integer, _
    ByRef IFLAG As Integer, _
    ByRef ELAM As Double, _
    ByVal FINFO_rptr As IntPtr _
  )

   Declare Sub D02KAY Lib "FLDLL224M_nag.dll" ( _
    ByRef NIT As Integer, _
    ByRef IFLAG As Integer, _
    ByRef ELAM As Double, _
    ByVal FINFO_rptr As IntPtr _
  )

   Declare Sub D02KAF Lib "FLDLL224M_nag.dll" ( _
    ByRef XL As Double, _
    ByRef XR As Double, _
    ByVal COEFFN As D02KAF_COEFFN_DELEGATE, _
    ByRef BCOND As Double, _
    ByRef K As Integer, _
    ByRef TOL As Double, _
    ByRef ELAM As Double, _
    ByRef DELAM As Double, _
    ByVal MONIT As D02KAF_MONIT_DELEGATE, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02KDF_COEFFN_DELEGATE( _
    ByRef P As Double, _
    ByRef Q As Double, _
    ByRef DQDL As Double, _
    ByRef X As Double, _
    ByRef ELAM As Double, _
    ByRef JINT As Integer _
  )

  Delegate Sub D02KDF_BDYVAL_DELEGATE( _
    ByRef XL As Double, _
    ByRef XR As Double, _
    ByRef ELAM As Double, _
    ByVal YL_rptr As IntPtr, _
    ByVal YR_rptr As IntPtr _
  )

  Delegate Sub D02KDF_MONIT_DELEGATE( _
    ByRef MAXIT As Integer, _
    ByRef IFLAG As Integer, _
    ByRef ELAM As Double, _
    ByVal FINFO_rptr As IntPtr _
  )


   Declare Sub D02KDF Lib "FLDLL224M_nag.dll" ( _
    ByRef XPOINT As Double, _
    ByRef M As Integer, _
    ByVal COEFFN As D02KDF_COEFFN_DELEGATE, _
    ByVal BDYVAL As D02KDF_BDYVAL_DELEGATE, _
    ByRef K As Integer, _
    ByRef TOL As Double, _
    ByRef ELAM As Double, _
    ByRef DELAM As Double, _
    ByRef HMAX As Double, _
    ByRef MAXIT As Integer, _
    ByRef MAXFUN As Integer, _
    ByVal MONIT As D02KDF_MONIT_DELEGATE, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02KEF_COEFFN_DELEGATE( _
    ByRef P As Double, _
    ByRef Q As Double, _
    ByRef DQDL As Double, _
    ByRef X As Double, _
    ByRef ELAM As Double, _
    ByRef JINT As Integer _
  )

  Delegate Sub D02KEF_BDYVAL_DELEGATE( _
    ByRef XL As Double, _
    ByRef XR As Double, _
    ByRef ELAM As Double, _
    ByVal YL_rptr As IntPtr, _
    ByVal YR_rptr As IntPtr _
  )

  Delegate Sub D02KEF_MONIT_DELEGATE( _
    ByRef MAXIT As Integer, _
    ByRef IFLAG As Integer, _
    ByRef ELAM As Double, _
    ByVal FINFO_rptr As IntPtr _
  )


  Delegate Sub D02KEF_REPORT_DELEGATE( _
    ByRef X As Double, _
    ByVal V_rptr As IntPtr, _
    ByRef JINT As Integer _
  )

   Declare Sub D02KEF Lib "FLDLL224M_nag.dll" ( _
    ByRef XPOINT As Double, _
    ByRef M As Integer, _
    ByRef MATCH As Integer, _
    ByVal COEFFN As D02KEF_COEFFN_DELEGATE, _
    ByVal BDYVAL As D02KEF_BDYVAL_DELEGATE, _
    ByRef K As Integer, _
    ByRef TOL As Double, _
    ByRef ELAM As Double, _
    ByRef DELAM As Double, _
    ByRef HMAX As Double, _
    ByRef MAXIT As Integer, _
    ByRef MAXFUN As Integer, _
    ByVal MONIT As D02KEF_MONIT_DELEGATE, _
    ByVal REPORT As D02KEF_REPORT_DELEGATE, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02LAF_FCN_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr _
  )

   Declare Sub D02LAF Lib "FLDLL224M_nag.dll" ( _
    ByVal FCN As D02LAF_FCN_DELEGATE, _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByRef TEND As Double, _
    ByRef Y As Double, _
    ByRef YP As Double, _
    ByRef YDP As Double, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02LXF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef H As Double, _
    ByRef TOL As Double, _
    ByRef THRES As Double, _
    ByRef THRESP As Double, _
    ByRef MAXSTP As Integer, _
    ByRef START As Integer, _
    ByRef ONESTP As Integer, _
    ByRef HIGH As Integer, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02LYF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef HNEXT As Double, _
    ByRef HUSED As Double, _
    ByRef HSTART As Double, _
    ByRef NSUCC As Integer, _
    ByRef NFAIL As Integer, _
    ByRef NATT As Integer, _
    ByRef THRES As Double, _
    ByRef THRESP As Double, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02LZF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByRef Y As Double, _
    ByRef YP As Double, _
    ByRef NWANT As Integer, _
    ByRef TWANT As Double, _
    ByRef YWANT As Double, _
    ByRef YPWANT As Double, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02MCF Lib "FLDLL224M_nag.dll" ( _
    ByRef ICOM As Integer _
   )


   Declare Sub D02MVF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQMAX As Integer, _
    ByRef SDYSAV As Integer, _
    ByRef MAXORD As Integer, _
    ByRef CON As Double, _
    ByRef TCRIT As Double, _
    ByRef HMIN As Double, _
    ByRef HMAX As Double, _
    ByRef H0 As Double, _
    ByRef MAXSTP As Integer, _
    ByRef MXHNIL As Integer, _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef RWORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02MWF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef MAXORD As Integer, _
    ByVal JCEVAL As string, ByVal JCEVALLength As Integer, _
    ByRef HMAX As Double, _
    ByRef H0 As Double, _
    ByRef ITOL As Integer, _
    ByRef ICOM As Integer, _
    ByRef LICOM As Integer, _
    ByRef COM As Double, _
    ByRef LCOM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02MZF Lib "FLDLL224M_nag.dll" ( _
    ByRef TSOL As Double, _
    ByRef SOL As Double, _
    ByRef M As Integer, _
    ByRef LDYSAV As Integer, _
    ByRef NEQ As Integer, _
    ByRef YSAV As Double, _
    ByRef SDYSAV As Integer, _
    ByRef RWORK As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02NBF_FCN_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D02NBF_JAC_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByRef H As Double, _
    ByRef D As Double, _
    ByVal P_rptr As IntPtr _
  )

   Declare Sub D02NBZ Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByRef H As Double, _
    ByRef D As Double, _
    ByVal P_rptr As IntPtr _
  )

  Delegate Sub D02NBF_MONITR_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef LDYSAV As Integer, _
    ByRef T As Double, _
    ByRef HLAST As Double, _
    ByRef HNEXT As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByVal YSAV_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByVal ACOR_rptr As IntPtr, _
    ByRef IMON As Integer, _
    ByRef INLN As Integer, _
    ByRef HMIN As Double, _
    ByRef HMAX As Double, _
    ByRef NQU As Integer _
  )

   Declare Sub D02NBY Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef LDYSAV As Integer, _
    ByRef T As Double, _
    ByRef HLAST As Double, _
    ByRef HNEXT As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByVal YSAV_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByVal ACOR_rptr As IntPtr, _
    ByRef IMON As Integer, _
    ByRef INLN As Integer, _
    ByRef HMIN As Double, _
    ByRef HMAX As Double, _
    ByRef NQU As Integer _
  )

   Declare Sub D02NBF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, ByRef LDYSAV As Integer, ByRef T As Double, _
    ByRef TOUT As Double, ByRef Y As Double, ByRef YDOT As Double, _
    ByRef RWORK As Double, ByRef RTOL As Double, ByRef ATOL As Double, _
    ByRef ITOL As Integer, ByRef INFORM As Integer, ByVal FCN As D02NBF_FCN_DELEGATE, _
    ByRef YSAV As Double, ByRef SDYSAV As Integer, ByVal JAC As D02NBF_JAC_DELEGATE, _
    ByRef WKJAC As Double, ByRef NWKJAC As Integer, ByVal MONITR As D02NBF_MONITR_DELEGATE, _
    ByRef ITASK As Integer, ByRef ITRACE As Integer, ByRef IFAIL As Integer _
   )


  Delegate Sub D02NCF_FCN_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D02NCF_JAC_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByRef H As Double, _
    ByRef D As Double, _
    ByRef ML As Integer, _
    ByRef MU As Integer, _
    ByVal P_rptr As IntPtr _
  )

   Declare Sub D02NCZ Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByRef H As Double, _
    ByRef D As Double, _
    ByRef ML As Integer, _
    ByRef MU As Integer, _
    ByVal P_rptr As IntPtr _
  )

  Delegate Sub D02NCF_MONITR_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef LDYSAV As Integer, _
    ByRef T As Double, _
    ByRef HLAST As Double, _
    ByRef HNEXT As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByVal YSAV_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByVal ACOR_rptr As IntPtr, _
    ByRef IMON As Integer, _
    ByRef INLN As Integer, _
    ByRef HMIN As Double, _
    ByRef HMAX As Double, _
    ByRef NQU As Integer _
  )


   Declare Sub D02NCF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, ByRef LDYSAV As Integer, ByRef T As Double, _
    ByRef TOUT As Double, ByRef Y As Double, ByRef YDOT As Double, _
    ByRef RWORK As Double, ByRef RTOL As Double, ByRef ATOL As Double, _
    ByRef ITOL As Integer, ByRef INFORM As Integer, ByVal FCN As D02NCF_FCN_DELEGATE, _
    ByRef YSAV As Double, ByRef SDYSAV As Integer, ByVal JAC As D02NCF_JAC_DELEGATE, _
    ByRef WKJAC As Double, ByRef NWKJAC As Integer, ByRef JACPVT As Integer, _
    ByRef NJCPVT As Integer, ByVal MONITR As D02NCF_MONITR_DELEGATE, ByRef ITASK As Integer, _
    ByRef ITRACE As Integer, ByRef IFAIL As Integer _
   )


  Delegate Sub D02NDF_FCN_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D02NDF_JAC_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByRef H As Double, _
    ByRef D As Double, _
    ByRef J As Integer, _
    ByVal PDJ_rptr As IntPtr _
  )

   Declare Sub D02NDZ Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByRef H As Double, _
    ByRef D As Double, _
    ByRef J As Integer, _
    ByVal PDJ_rptr As IntPtr _
  )

  Delegate Sub D02NDF_MONITR_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef LDYSAV As Integer, _
    ByRef T As Double, _
    ByRef HLAST As Double, _
    ByRef HNEXT As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByVal YSAV_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByVal ACOR_rptr As IntPtr, _
    ByRef IMON As Integer, _
    ByRef INLN As Integer, _
    ByRef HMIN As Double, _
    ByRef HMAX As Double, _
    ByRef NQU As Integer _
  )


   Declare Sub D02NDF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, ByRef LDYSAV As Integer, ByRef T As Double, _
    ByRef TOUT As Double, ByRef Y As Double, ByRef YDOT As Double, _
    ByRef RWORK As Double, ByRef RTOL As Double, ByRef ATOL As Double, _
    ByRef ITOL As Integer, ByRef INFORM As Integer, ByVal FCN As D02NDF_FCN_DELEGATE, _
    ByRef YSAV As Double, ByRef SDYSAV As Integer, ByVal JAC As D02NDF_JAC_DELEGATE, _
    ByRef WKJAC As Double, ByRef NWKJAC As Integer, ByRef JACPVT As Integer, _
    ByRef NJCPVT As Integer, ByVal MONITR As D02NDF_MONITR_DELEGATE, ByRef ITASK As Integer, _
    ByRef ITRACE As Integer, ByRef IFAIL As Integer _
   )


  Delegate Sub D02NEF_RES_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub D02NEF_JAC_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByVal PD_rptr As IntPtr, _
    ByRef CJ As Double, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub D02NEZ Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByVal PD_rptr As IntPtr, _
    ByRef CJ As Double, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub D02NEF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByRef TOUT As Double, _
    ByRef Y As Double, _
    ByRef YDOT As Double, _
    ByRef RTOL As Double, _
    ByRef ATOL As Double, _
    ByRef ITASK As Integer, _
    ByVal RES As D02NEF_RES_DELEGATE, _
    ByVal JAC As D02NEF_JAC_DELEGATE, _
    ByRef ICOM As Integer, _
    ByRef COM As Double, _
    ByRef LCOM As Integer, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02NGF_RESID_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D02NGF_JAC_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByRef H As Double, _
    ByRef D As Double, _
    ByVal P_rptr As IntPtr _
  )

   Declare Sub D02NGZ Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByRef H As Double, _
    ByRef D As Double, _
    ByVal P_rptr As IntPtr _
  )

  Delegate Sub D02NGF_MONITR_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef LDYSAV As Integer, _
    ByRef T As Double, _
    ByRef HLAST As Double, _
    ByRef HNEXT As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByVal YSAV_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByVal ACOR_rptr As IntPtr, _
    ByRef IMON As Integer, _
    ByRef INLN As Integer, _
    ByRef HMIN As Double, _
    ByRef HMAX As Double, _
    ByRef NQU As Integer _
  )


   Declare Sub D02NGF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, ByRef LDYSAV As Integer, ByRef T As Double, _
    ByRef TOUT As Double, ByRef Y As Double, ByRef YDOT As Double, _
    ByRef RWORK As Double, ByRef RTOL As Double, ByRef ATOL As Double, _
    ByRef ITOL As Integer, ByRef INFORM As Integer, ByVal RESID As D02NGF_RESID_DELEGATE, _
    ByRef YSAV As Double, ByRef SDYSAV As Integer, ByVal JAC As D02NGF_JAC_DELEGATE, _
    ByRef WKJAC As Double, ByRef NWKJAC As Integer, ByVal MONITR As D02NGF_MONITR_DELEGATE, _
    ByRef LDERIV As Integer, ByRef ITASK As Integer, ByRef ITRACE As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02NHF_RESID_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D02NHF_JAC_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByRef H As Double, _
    ByRef D As Double, _
    ByRef ML As Integer, _
    ByRef MU As Integer, _
    ByVal P_rptr As IntPtr _
  )

   Declare Sub D02NHZ Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByRef H As Double, _
    ByRef D As Double, _
    ByRef ML As Integer, _
    ByRef MU As Integer, _
    ByVal P_rptr As IntPtr _
  )

  Delegate Sub D02NHF_MONITR_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef LDYSAV As Integer, _
    ByRef T As Double, _
    ByRef HLAST As Double, _
    ByRef HNEXT As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByVal YSAV_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByVal ACOR_rptr As IntPtr, _
    ByRef IMON As Integer, _
    ByRef INLN As Integer, _
    ByRef HMIN As Double, _
    ByRef HMAX As Double, _
    ByRef NQU As Integer _
  )


   Declare Sub D02NHF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, ByRef LDYSAV As Integer, ByRef T As Double, _
    ByRef TOUT As Double, ByRef Y As Double, ByRef YDOT As Double, _
    ByRef RWORK As Double, ByRef RTOL As Double, ByRef ATOL As Double, _
    ByRef ITOL As Integer, ByRef INFORM As Integer, ByVal RESID As D02NHF_RESID_DELEGATE, _
    ByRef YSAV As Double, ByRef SDYSAV As Integer, ByVal JAC As D02NHF_JAC_DELEGATE, _
    ByRef WKJAC As Double, ByRef NWKJAC As Integer, ByRef JACPVT As Integer, _
    ByRef NJCPVT As Integer, ByVal MONITR As D02NHF_MONITR_DELEGATE, ByRef LDERIV As Integer, _
    ByRef ITASK As Integer, ByRef ITRACE As Integer, ByRef IFAIL As Integer _
   )


  Delegate Sub D02NJF_RESID_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D02NJF_JAC_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByRef H As Double, _
    ByRef D As Double, _
    ByRef J As Integer, _
    ByVal PDJ_rptr As IntPtr _
  )

   Declare Sub D02NJZ Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByRef H As Double, _
    ByRef D As Double, _
    ByRef J As Integer, _
    ByVal PDJ_rptr As IntPtr _
  )

  Delegate Sub D02NJF_MONITR_DELEGATE( _
    ByRef NEQ As Integer, _
    ByRef LDYSAV As Integer, _
    ByRef T As Double, _
    ByRef HLAST As Double, _
    ByRef HNEXT As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YDOT_rptr As IntPtr, _
    ByVal YSAV_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByVal ACOR_rptr As IntPtr, _
    ByRef IMON As Integer, _
    ByRef INLN As Integer, _
    ByRef HMIN As Double, _
    ByRef HMAX As Double, _
    ByRef NQU As Integer _
  )


   Declare Sub D02NJF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, ByRef LDYSAV As Integer, ByRef T As Double, _
    ByRef TOUT As Double, ByRef Y As Double, ByRef YDOT As Double, _
    ByRef RWORK As Double, ByRef RTOL As Double, ByRef ATOL As Double, _
    ByRef ITOL As Integer, ByRef INFORM As Integer, ByVal RESID As D02NJF_RESID_DELEGATE, _
    ByRef YSAV As Double, ByRef SDYSAV As Integer, ByVal JAC As D02NJF_JAC_DELEGATE, _
    ByRef WKJAC As Double, ByRef NWKJAC As Integer, ByRef JACPVT As Integer, _
    ByRef NJCPVT As Integer, ByVal MONITR As D02NJF_MONITR_DELEGATE, ByRef LDERIV As Integer, _
    ByRef ITASK As Integer, ByRef ITRACE As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub D02NMF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, ByRef LDYSAV As Integer, ByRef T As Double, _
    ByRef TOUT As Double, ByRef Y As Double, ByRef YDOT As Double, _
    ByRef RWORK As Double, ByRef RTOL As Double, ByRef ATOL As Double, _
    ByRef ITOL As Integer, ByRef INFORM As Integer, ByRef YSAV As Double, _
    ByRef SDYSAV As Integer, ByRef WKJAC As Double, ByRef NWKJAC As Integer, _
    ByRef JACPVT As Integer, ByRef NJCPVT As Integer, ByRef IMON As Integer, _
    ByRef INLN As Integer, ByRef IRES As Integer, ByRef IREVCM As Integer, _
    ByRef ITASK As Integer, ByRef ITRACE As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub D02NNF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, ByRef LDYSAV As Integer, ByRef T As Double, _
    ByRef TOUT As Double, ByRef Y As Double, ByRef YDOT As Double, _
    ByRef RWORK As Double, ByRef RTOL As Double, ByRef ATOL As Double, _
    ByRef ITOL As Integer, ByRef INFORM As Integer, ByRef YSAV As Double, _
    ByRef SDYSAV As Integer, ByRef WKJAC As Double, ByRef NWKJAC As Integer, _
    ByRef JACPVT As Integer, ByRef NJCPVT As Integer, ByRef IMON As Integer, _
    ByRef INLN As Integer, ByRef IRES As Integer, ByRef IREVCM As Integer, _
    ByRef LDERIV As Integer, ByRef ITASK As Integer, ByRef ITRACE As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02NPF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef ML As Integer, _
    ByRef MU As Integer, _
    ByRef ICOM As Integer, _
    ByRef LICOM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02NRF Lib "FLDLL224M_nag.dll" ( _
    ByRef J As Integer, _
    ByRef IPLACE As Integer, _
    ByRef INFORM As Integer _
   )


   Declare Sub D02NSF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef NEQMAX As Integer, _
    ByVal JCEVAL As string, ByVal JCEVALLength As Integer, _
    ByRef NWKJAC As Integer, _
    ByRef RWORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02NTF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef NEQMAX As Integer, _
    ByVal JCEVAL As string, ByVal JCEVALLength As Integer, _
    ByRef ML As Integer, _
    ByRef MU As Integer, _
    ByRef NWKJAC As Integer, _
    ByRef NJCPVT As Integer, _
    ByRef RWORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02NUF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef NEQMAX As Integer, _
    ByVal JCEVAL As string, ByVal JCEVALLength As Integer, _
    ByRef NWKJAC As Integer, _
    ByRef IA As Integer, _
    ByRef NIA As Integer, _
    ByRef JA As Integer, _
    ByRef NJA As Integer, _
    ByRef JACPVT As Integer, _
    ByRef NJCPVT As Integer, _
    ByRef SENS As Double, _
    ByRef U As Double, _
    ByRef ETA As Double, _
    ByRef LBLOCK As Integer, _
    ByRef ISPLIT As Integer, _
    ByRef RWORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02NVF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQMAX As Integer, _
    ByRef SDYSAV As Integer, _
    ByRef MAXORD As Integer, _
    ByVal METHOD As string, ByVal METHODLength As Integer, _
    ByRef PETZLD As Integer, _
    ByRef CON As Double, _
    ByRef TCRIT As Double, _
    ByRef HMIN As Double, _
    ByRef HMAX As Double, _
    ByRef H0 As Double, _
    ByRef MAXSTP As Integer, _
    ByRef MXHNIL As Integer, _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef RWORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02NWF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQMAX As Integer, _
    ByRef SDYSAV As Integer, _
    ByRef MAXORD As Integer, _
    ByRef CON As Double, _
    ByRef TCRIT As Double, _
    ByRef HMIN As Double, _
    ByRef HMAX As Double, _
    ByRef H0 As Double, _
    ByRef MAXSTP As Integer, _
    ByRef MXHNIL As Integer, _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef RWORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02NXF Lib "FLDLL224M_nag.dll" ( _
    ByRef ICALL As Integer, _
    ByRef LIWREQ As Integer, _
    ByRef LIWUSD As Integer, _
    ByRef LRWREQ As Integer, _
    ByRef LRWUSD As Integer, _
    ByRef NLU As Integer, _
    ByRef NNZ As Integer, _
    ByRef NGP As Integer, _
    ByRef ISPLIT As Integer, _
    ByRef IGROW As Integer, _
    ByRef LBLOCK As Integer, _
    ByRef NBLOCK As Integer, _
    ByRef INFORM As Integer _
   )


   Declare Sub D02NYF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef NEQMAX As Integer, _
    ByRef HU As Double, _
    ByRef H As Double, _
    ByRef TCUR As Double, _
    ByRef TOLSF As Double, _
    ByRef RWORK As Double, _
    ByRef NST As Integer, _
    ByRef NRE As Integer, _
    ByRef NJE As Integer, _
    ByRef NQU As Integer, _
    ByRef NQ As Integer, _
    ByRef NITER As Integer, _
    ByRef IMXER As Integer, _
    ByRef ALGEQU As Integer, _
    ByRef INFORM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02NZF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQMAX As Integer, _
    ByRef TCRIT As Double, _
    ByRef H As Double, _
    ByRef HMIN As Double, _
    ByRef HMAX As Double, _
    ByRef MAXSTP As Integer, _
    ByRef MXHNIL As Integer, _
    ByRef RWORK As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02PCF_F_DELEGATE( _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YP_rptr As IntPtr _
  )

   Declare Sub D02PCF Lib "FLDLL224M_nag.dll" ( _
    ByVal F As D02PCF_F_DELEGATE, _
    ByRef TWANT As Double, _
    ByRef TGOT As Double, _
    ByRef YGOT As Double, _
    ByRef YPGOT As Double, _
    ByRef YMAX As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02PDF_F_DELEGATE( _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YP_rptr As IntPtr _
  )

   Declare Sub D02PDF Lib "FLDLL224M_nag.dll" ( _
    ByVal F As D02PDF_F_DELEGATE, _
    ByRef TNOW As Double, _
    ByRef YNOW As Double, _
    ByRef YPNOW As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02PVF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef TSTART As Double, _
    ByRef YSTART As Double, _
    ByRef TEND As Double, _
    ByRef TOL As Double, _
    ByRef THRES As Double, _
    ByRef METHOD As Integer, _
    ByVal TASK As string, ByVal TASKLength As Integer, _
    ByRef ERRASS As Integer, _
    ByRef HSTART As Double, _
    ByRef WORK As Double, _
    ByRef LENWRK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02PWF Lib "FLDLL224M_nag.dll" ( _
    ByRef TENDNU As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02PXF_F_DELEGATE( _
    ByRef T As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YP_rptr As IntPtr _
  )

   Declare Sub D02PXF Lib "FLDLL224M_nag.dll" ( _
    ByRef TWANT As Double, _
    ByVal REQEST As string, ByVal REQESTLength As Integer, _
    ByRef NWANT As Integer, _
    ByRef YWANT As Double, _
    ByRef YPWANT As Double, _
    ByVal F As D02PXF_F_DELEGATE, _
    ByRef WORK As Double, _
    ByRef WRKINT As Double, _
    ByRef LENINT As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02PYF Lib "FLDLL224M_nag.dll" ( _
    ByRef TOTFCN As Integer, _
    ByRef STPCST As Integer, _
    ByRef WASTE As Double, _
    ByRef STPSOK As Integer, _
    ByRef HNEXT As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02PZF Lib "FLDLL224M_nag.dll" ( _
    ByRef RMSERR As Double, _
    ByRef ERRMAX As Double, _
    ByRef TERRMX As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02QFF_FCN_DELEGATE( _
    ByRef NEQF As Integer, _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr _
  )

  Delegate Function D02QFF_G_DELEGATE( _
    ByRef NEQF As Integer, _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YP_rptr As IntPtr, _
    ByRef K As Integer _
  ) as Double

   Declare Function D02QFZ Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQF As Integer, _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal YP_rptr As IntPtr, _
    ByRef K As Integer _
  ) as Double

   Declare Sub D02QFF Lib "FLDLL224M_nag.dll" ( _
    ByVal FCN As D02QFF_FCN_DELEGATE, _
    ByRef NEQF As Integer, _
    ByRef T As Double, _
    ByRef Y As Double, _
    ByRef TOUT As Double, _
    ByVal G As D02QFF_G_DELEGATE, _
    ByRef NEQG As Integer, _
    ByRef ROOT As Integer, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02QGF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQF As Integer, _
    ByRef T As Double, _
    ByRef Y As Double, _
    ByRef TOUT As Double, _
    ByRef NEQG As Integer, _
    ByRef ROOT As Integer, _
    ByRef IREVCM As Integer, _
    ByRef TRVCM As Double, _
    ByRef YRVCM As Integer, _
    ByRef YPRVCM As Integer, _
    ByRef GRVCM As Double, _
    ByRef KGRVCM As Integer, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02QWF Lib "FLDLL224M_nag.dll" ( _
    ByVal STATEF As string, ByVal STATEFLength As Integer, ByRef NEQF As Integer, ByRef VECTOL As Integer, _
    ByRef ATOL As Double, ByRef LATOL As Integer, ByRef RTOL As Double, _
    ByRef LRTOL As Integer, ByRef ONESTP As Integer, ByRef CRIT As Integer, _
    ByRef TCRIT As Double, ByRef HMAX As Double, ByRef MAXSTP As Integer, _
    ByRef NEQG As Integer, ByRef ALTERG As Integer, ByRef SOPHST As Integer, _
    ByRef RWORK As Double, ByRef LRWORK As Integer, ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub D02QXF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQF As Integer, _
    ByRef YP As Double, _
    ByRef TCURR As Double, _
    ByRef HLAST As Double, _
    ByRef HNEXT As Double, _
    ByRef ODLAST As Integer, _
    ByRef ODNEXT As Integer, _
    ByRef NSUCC As Integer, _
    ByRef NFAIL As Integer, _
    ByRef TOLFAC As Double, _
    ByRef BADCMP As Integer, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02QYF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQG As Integer, _
    ByRef INDEX As Integer, _
    ByRef ITYPE As Integer, _
    ByRef EVENTS As Integer, _
    ByRef RESIDS As Double, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02QZF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQF As Integer, _
    ByRef TWANT As Double, _
    ByRef NWANT As Integer, _
    ByRef YWANT As Double, _
    ByRef YPWANT As Double, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02RAF_FCN_DELEGATE( _
    ByRef X As Double, _
    ByRef EPS As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef N As Integer _
  )

  Delegate Sub D02RAF_G_DELEGATE( _
    ByRef EPS As Double, _
    ByVal YA_rptr As IntPtr, _
    ByVal YB_rptr As IntPtr, _
    ByVal BC_rptr As IntPtr, _
    ByRef N As Integer _
  )

  Delegate Sub D02RAF_JACOBF_DELEGATE( _
    ByRef X As Double, _
    ByRef EPS As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef N As Integer _
  )

   Declare Sub D02GAZ Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef EPS As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef N As Integer _
  )

  Delegate Sub D02RAF_JACOBG_DELEGATE( _
    ByRef EPS As Double, _
    ByVal YA_rptr As IntPtr, _
    ByVal YB_rptr As IntPtr, _
    ByVal AJ_rptr As IntPtr, _
    ByVal BJ_rptr As IntPtr, _
    ByRef N As Integer _
  )

   Declare Sub D02GAY Lib "FLDLL224M_nag.dll" ( _
    ByRef EPS As Double, _
    ByVal YA_rptr As IntPtr, _
    ByVal YB_rptr As IntPtr, _
    ByVal AJ_rptr As IntPtr, _
    ByVal BJ_rptr As IntPtr, _
    ByRef N As Integer _
  )

  Delegate Sub D02RAF_JACEPS_DELEGATE( _
    ByRef X As Double, _
    ByRef EPS As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef N As Integer _
  )

   Declare Sub D02GAW Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef EPS As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef N As Integer _
  )

  Delegate Sub D02RAF_JACGEP_DELEGATE( _
    ByRef EPS As Double, _
    ByVal YA_rptr As IntPtr, _
    ByVal YB_rptr As IntPtr, _
    ByVal BCEP_rptr As IntPtr, _
    ByRef N As Integer _
  )

   Declare Sub D02GAX Lib "FLDLL224M_nag.dll" ( _
    ByRef EPS As Double, _
    ByVal YA_rptr As IntPtr, _
    ByVal YB_rptr As IntPtr, _
    ByVal BCEP_rptr As IntPtr, _
    ByRef N As Integer _
  )

   Declare Sub D02RAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, ByRef MNP As Integer, ByRef NP As Integer, _
    ByRef NUMBEG As Integer, ByRef NUMMIX As Integer, ByRef TOL As Double, _
    ByRef INIT As Integer, ByRef X As Double, ByRef Y As Double, _
    ByRef LDY As Integer, ByRef ABT As Double, ByVal FCN As D02RAF_FCN_DELEGATE, _
    ByVal G As D02RAF_G_DELEGATE, ByRef IJAC As Integer, ByVal JACOBF As D02RAF_JACOBF_DELEGATE, _
    ByVal JACOBG As D02RAF_JACOBG_DELEGATE, ByRef DELEPS As Double, ByVal JACEPS As D02RAF_JACEPS_DELEGATE, _
    ByVal JACGEP As D02RAF_JACGEP_DELEGATE, ByRef WORK As Double, ByRef LWORK As Integer, _
    ByRef IWORK As Integer, ByRef LIWORK As Integer, ByRef IFAIL As Integer _
   )


  Delegate Sub D02SAF_RANGE_DELEGATE( _
    ByVal X_rptr As IntPtr, _
    ByRef NPOINT As Integer, _
    ByVal P_rptr As IntPtr, _
    ByRef M As Integer _
  )

  Delegate Sub D02SAF_BC_DELEGATE( _
    ByVal G1_rptr As IntPtr, _
    ByVal G2_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByRef M As Integer, _
    ByRef N As Integer _
  )

  Delegate Sub D02SAF_FCN_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef N As Integer, _
    ByVal P_rptr As IntPtr, _
    ByRef M As Integer, _
    ByRef I As Integer _
  )

  Delegate Sub D02SAF_EQN_DELEGATE( _
    ByVal E_rptr As IntPtr, _
    ByRef Q As Integer, _
    ByVal P_rptr As IntPtr, _
    ByRef M As Integer _
  )

   Declare Sub D02HBZ Lib "FLDLL224M_nag.dll" ( _
    ByVal E_rptr As IntPtr, _
    ByRef Q As Integer, _
    ByVal P_rptr As IntPtr, _
    ByRef M As Integer _
  )

  Delegate Function D02SAF_CONSTR_DELEGATE( _
    ByVal P_rptr As IntPtr, _
    ByRef M As Integer _
  ) as Integer

   Declare Function D02HBY Lib "FLDLL224M_nag.dll" ( _
    ByVal P_rptr As IntPtr, _
    ByRef M As Integer _
  ) as Integer

  Delegate Sub D02SAF_MONIT_DELEGATE( _
    ByRef ISTATE As Integer, _
    ByRef IFLAG As Integer, _
    ByRef IFAIL1 As Integer, _
    ByVal P_rptr As IntPtr, _
    ByRef M As Integer, _
    ByVal F_rptr As IntPtr, _
    ByRef PNORM As Double, _
    ByRef PNORM1 As Double, _
    ByRef EPS As Double, _
    ByVal D_rptr As IntPtr _
  )

   Declare Sub D02HBX Lib "FLDLL224M_nag.dll" ( _
    ByRef ISTATE As Integer, _
    ByRef IFLAG As Integer, _
    ByRef IFAIL1 As Integer, _
    ByVal P_rptr As IntPtr, _
    ByRef M As Integer, _
    ByVal F_rptr As IntPtr, _
    ByRef PNORM As Double, _
    ByRef PNORM1 As Double, _
    ByRef EPS As Double, _
    ByVal D_rptr As IntPtr _
  )

   Declare Sub D02SAS Lib "FLDLL224M_nag.dll" ( _
    ByRef ISTATE As Integer, _
    ByRef IFLAG As Integer, _
    ByRef IFAIL1 As Integer, _
    ByVal P_rptr As IntPtr, _
    ByRef M As Integer, _
    ByVal F_rptr As IntPtr, _
    ByRef PNORM As Double, _
    ByRef PNORM1 As Double, _
    ByRef EPS As Double, _
    ByVal D_rptr As IntPtr _
  )

  Delegate Sub D02SAF_PRSOL_DELEGATE( _
    ByRef Z As Double, _
    ByVal Y_rptr As IntPtr, _
    ByRef N As Integer _
  )

   Declare Sub D02HBW Lib "FLDLL224M_nag.dll" ( _
    ByRef Z As Double, _
    ByVal Y_rptr As IntPtr, _
    ByRef N As Integer _
  )

   Declare Sub D02SAF Lib "FLDLL224M_nag.dll" ( _
    ByRef P As Double, ByRef M As Integer, ByRef N As Integer, _
    ByRef N1 As Integer, ByRef PE As Double, ByRef PF As Double, _
    ByRef E As Double, ByRef DP As Double, ByRef NPOINT As Integer, _
    ByRef SWP As Double, ByRef LDSWP As Integer, ByRef ICOUNT As Integer, _
    ByVal RANGE As D02SAF_RANGE_DELEGATE, ByVal BC As D02SAF_BC_DELEGATE, ByVal FCN As D02SAF_FCN_DELEGATE, _
    ByVal EQN As D02SAF_EQN_DELEGATE, ByVal CONSTR As D02SAF_CONSTR_DELEGATE, ByRef YMAX As Double, _
    ByVal MONIT As D02SAF_MONIT_DELEGATE, ByVal PRSOL As D02SAF_PRSOL_DELEGATE, ByRef W As Double, _
    ByRef LDW As Integer, ByRef SDW As Integer, ByRef IFAIL As Integer _
   )


  Delegate Sub D02TGF_COEFF_DELEGATE( _
    ByRef X As Double, _
    ByRef I As Integer, _
    ByVal A_rptr As IntPtr, _
    ByRef IA As Integer, _
    ByRef IA1 As Integer, _
    ByRef RHS As Double _
  )

  Delegate Sub D02TGF_BDYC_DELEGATE( _
    ByRef X As Double, _
    ByRef I As Integer, _
    ByRef J As Integer, _
    ByVal A_rptr As IntPtr, _
    ByRef IA As Integer, _
    ByRef IA1 As Integer, _
    ByRef RHS As Double _
  )

   Declare Sub D02TGF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef M As Integer, _
    ByRef L As Integer, _
    ByRef X0 As Double, _
    ByRef X1 As Double, _
    ByRef K1 As Integer, _
    ByRef KP As Integer, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByVal COEFF As D02TGF_COEFF_DELEGATE, _
    ByVal BDYC As D02TGF_BDYC_DELEGATE, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D02TKF_FFUN_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByRef NEQ As Integer, _
    ByVal M_iptr As IntPtr, _
    ByVal F_rptr As IntPtr _
  )

  Delegate Sub D02TKF_FJAC_DELEGATE( _
    ByRef X As Double, _
    ByVal Y_rptr As IntPtr, _
    ByRef NEQ As Integer, _
    ByVal M_iptr As IntPtr, _
    ByVal DFDY_rptr As IntPtr _
  )

  Delegate Sub D02TKF_GAFUN_DELEGATE( _
    ByVal YA_rptr As IntPtr, _
    ByRef NEQ As Integer, _
    ByVal M_iptr As IntPtr, _
    ByRef NLBC As Integer, _
    ByVal GA_rptr As IntPtr _
  )

  Delegate Sub D02TKF_GBFUN_DELEGATE( _
    ByVal YB_rptr As IntPtr, _
    ByRef NEQ As Integer, _
    ByVal M_iptr As IntPtr, _
    ByRef NRBC As Integer, _
    ByVal GB_rptr As IntPtr _
  )

  Delegate Sub D02TKF_GAJAC_DELEGATE( _
    ByVal YA_rptr As IntPtr, _
    ByRef NEQ As Integer, _
    ByVal M_iptr As IntPtr, _
    ByRef NLBC As Integer, _
    ByVal DGADY_rptr As IntPtr _
  )

  Delegate Sub D02TKF_GBJAC_DELEGATE( _
    ByVal YB_rptr As IntPtr, _
    ByRef NEQ As Integer, _
    ByVal M_iptr As IntPtr, _
    ByRef NRBC As Integer, _
    ByVal DGBDY_rptr As IntPtr _
  )

  Delegate Sub D02TKF_GUESS_DELEGATE( _
    ByRef X As Double, _
    ByRef NEQ As Integer, _
    ByVal M_iptr As IntPtr, _
    ByVal Y_rptr As IntPtr, _
    ByVal DYM_rptr As IntPtr _
  )

   Declare Sub D02TKF Lib "FLDLL224M_nag.dll" ( _
    ByVal FFUN As D02TKF_FFUN_DELEGATE, _
    ByVal FJAC As D02TKF_FJAC_DELEGATE, _
    ByVal GAFUN As D02TKF_GAFUN_DELEGATE, _
    ByVal GBFUN As D02TKF_GBFUN_DELEGATE, _
    ByVal GAJAC As D02TKF_GAJAC_DELEGATE, _
    ByVal GBJAC As D02TKF_GBJAC_DELEGATE, _
    ByVal GUESS As D02TKF_GUESS_DELEGATE, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02TVF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef M As Integer, _
    ByRef NLBC As Integer, _
    ByRef NRBC As Integer, _
    ByRef NCOL As Integer, _
    ByRef TOLS As Double, _
    ByRef MXMESH As Integer, _
    ByRef NMESH As Integer, _
    ByRef MESH As Double, _
    ByRef IPMESH As Integer, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02TXF Lib "FLDLL224M_nag.dll" ( _
    ByRef MXMESH As Integer, _
    ByRef NMESH As Integer, _
    ByRef MESH As Double, _
    ByRef IPMESH As Integer, _
    ByRef RWORK As Double, _
    ByRef IWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02TYF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef NEQ As Integer, _
    ByRef MMAX As Integer, _
    ByRef RWORK As Double, _
    ByRef IWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02TZF Lib "FLDLL224M_nag.dll" ( _
    ByRef MXMESH As Integer, _
    ByRef NMESH As Integer, _
    ByRef MESH As Double, _
    ByRef IPMESH As Integer, _
    ByRef ERMX As Double, _
    ByRef IERMX As Integer, _
    ByRef IJERMX As Integer, _
    ByRef RWORK As Double, _
    ByRef IWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02XJF Lib "FLDLL224M_nag.dll" ( _
    ByRef XSOL As Double, _
    ByRef SOL As Double, _
    ByRef M As Integer, _
    ByRef YSAV As Double, _
    ByRef LDYSAV As Integer, _
    ByRef SDYSAV As Integer, _
    ByRef NEQ As Integer, _
    ByRef X As Double, _
    ByRef NQU As Integer, _
    ByRef HU As Double, _
    ByRef H As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D02XKF Lib "FLDLL224M_nag.dll" ( _
    ByRef XSOL As Double, _
    ByRef SOL As Double, _
    ByRef M As Integer, _
    ByRef YSAV As Double, _
    ByRef LDYSAV As Integer, _
    ByRef SDYSAV As Integer, _
    ByRef ACOR As Double, _
    ByRef NEQ As Integer, _
    ByRef X As Double, _
    ByRef NQU As Integer, _
    ByRef HU As Double, _
    ByRef H As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Function D02ZAF Lib "FLDLL224M_nag.dll" ( _
    ByRef NEQ As Integer, _
    ByRef V As Double, _
    ByRef W As Double, _
    ByRef IFAIL As Integer _
   ) as Double


   Declare Sub D03EAF Lib "FLDLL224M_nag.dll" ( _
    ByRef STAGE1 As Integer, _
    ByRef EXT As Integer, _
    ByRef DORM As Integer, _
    ByRef N As Integer, _
    ByRef P As Double, _
    ByRef Q As Double, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef N1P1 As Integer, _
    ByRef PHI As Double, _
    ByRef PHID As Double, _
    ByRef ALPHA As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByRef NP4 As Integer, _
    ByRef ICINT As Integer, _
    ByRef NP1 As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03EBF Lib "FLDLL224M_nag.dll" ( _
    ByRef N1 As Integer, ByRef N2 As Integer, ByRef LDA As Integer, _
    ByRef A As Double, ByRef B As Double, ByRef C As Double, _
    ByRef D As Double, ByRef E As Double, ByRef Q As Double, _
    ByRef T As Double, ByRef APARAM As Double, ByRef ITMAX As Integer, _
    ByRef ITCOUN As Integer, ByRef ITUSED As Integer, ByRef NDIR As Integer, _
    ByRef IXN As Integer, ByRef IYN As Integer, ByRef CONRES As Double, _
    ByRef CONCHN As Double, ByRef RESIDS As Double, ByRef CHNGS As Double, _
    ByRef WRKSP1 As Double, ByRef WRKSP2 As Double, ByRef WRKSP3 As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03ECF Lib "FLDLL224M_nag.dll" ( _
    ByRef N1 As Integer, ByRef N2 As Integer, ByRef N3 As Integer, _
    ByRef LDA As Integer, ByRef SDA As Integer, ByRef A As Double, _
    ByRef B As Double, ByRef C As Double, ByRef D As Double, _
    ByRef E As Double, ByRef F As Double, ByRef G As Double, _
    ByRef Q As Double, ByRef T As Double, ByRef APARAM As Double, _
    ByRef ITMAX As Integer, ByRef ITCOUN As Integer, ByRef ITUSED As Integer, _
    ByRef NDIR As Integer, ByRef IXN As Integer, ByRef IYN As Integer, _
    ByRef IZN As Integer, ByRef CONRES As Double, ByRef CONCHN As Double, _
    ByRef RESIDS As Double, ByRef CHNGS As Double, ByRef WRKSP1 As Double, _
    ByRef WRKSP2 As Double, ByRef WRKSP3 As Double, ByRef WRKSP4 As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03EDF Lib "FLDLL224M_nag.dll" ( _
    ByRef NGX As Integer, _
    ByRef NGY As Integer, _
    ByRef LDA As Integer, _
    ByRef A As Double, _
    ByRef RHS As Double, _
    ByRef UB As Double, _
    ByRef MAXIT As Integer, _
    ByRef ACC As Double, _
    ByRef US As Double, _
    ByRef U As Double, _
    ByRef IOUT As Integer, _
    ByRef NUMIT As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D03EEF_PDEF_DELEGATE( _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef ALPHA As Double, _
    ByRef BETA As Double, _
    ByRef GAMMA As Double, _
    ByRef DELTA As Double, _
    ByRef EPSLON As Double, _
    ByRef PHI As Double, _
    ByRef PSI As Double _
  )

  Delegate Sub D03EEF_BNDY_DELEGATE( _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef C As Double, _
    ByRef IBND As Integer _
  )

   Declare Sub D03EEF Lib "FLDLL224M_nag.dll" ( _
    ByRef XMIN As Double, _
    ByRef XMAX As Double, _
    ByRef YMIN As Double, _
    ByRef YMAX As Double, _
    ByVal PDEF As D03EEF_PDEF_DELEGATE, _
    ByVal BNDY As D03EEF_BNDY_DELEGATE, _
    ByRef NGX As Integer, _
    ByRef NGY As Integer, _
    ByRef LDA As Integer, _
    ByRef A As Double, _
    ByRef RHS As Double, _
    ByVal SCHEME As string, ByVal SCHEMELength As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03FAF Lib "FLDLL224M_nag.dll" ( _
    ByRef XS As Double, ByRef XF As Double, ByRef L As Integer, _
    ByRef LBDCND As Integer, ByRef BDXS As Double, ByRef BDXF As Double, _
    ByRef YS As Double, ByRef YF As Double, ByRef M As Integer, _
    ByRef MBDCND As Integer, ByRef BDYS As Double, ByRef BDYF As Double, _
    ByRef ZS As Double, ByRef ZF As Double, ByRef N As Integer, _
    ByRef NBDCND As Integer, ByRef BDZS As Double, ByRef BDZF As Double, _
    ByRef LAMBDA As Double, ByRef LDF As Integer, ByRef LDF2 As Integer, _
    ByRef F As Double, ByRef PERTRB As Double, ByRef W As Double, _
    ByRef LWRK As Integer, ByRef IFAIL As Integer _
   )


  Delegate Function D03MAF_ISIN_DELEGATE( _
    ByRef X As Double, _
    ByRef Y As Double _
  ) as Integer

   Declare Sub D03MAF Lib "FLDLL224M_nag.dll" ( _
    ByRef H As Double, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef NB As Integer, _
    ByRef NPTS As Integer, _
    ByRef PLACES As Double, _
    ByRef INDX As Integer, _
    ByRef SDINDX As Integer, _
    ByVal ISIN As D03MAF_ISIN_DELEGATE, _
    ByRef DIST As Double, _
    ByRef SDDIST As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03NCF Lib "FLDLL224M_nag.dll" ( _
    ByRef KOPT As Integer, ByRef X As Double, ByVal MESH As string, ByVal MESHLength As Integer, _
    ByRef NS As Integer, ByRef S As Double, ByRef NT As Integer, _
    ByRef T As Double, ByRef TDPAR As Integer, ByRef R As Double, _
    ByRef Q As Double, ByRef SIGMA As Double, ByRef ALPHA As Double, _
    ByRef NTKEEP As Integer, ByRef F As Double, ByRef THETA As Double, _
    ByRef DELTA As Double, ByRef GAMMA As Double, ByRef LAMBDA As Double, _
    ByRef RHO As Double, ByRef LDF As Integer, ByRef WORK As Double, _
    ByRef IWORK As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub D03NDF Lib "FLDLL224M_nag.dll" ( _
    ByRef KOPT As Integer, _
    ByRef X As Double, _
    ByRef S As Double, _
    ByRef T As Double, _
    ByRef TMAT As Double, _
    ByRef TDPAR As Integer, _
    ByRef R As Double, _
    ByRef Q As Double, _
    ByRef SIGMA As Double, _
    ByRef F As Double, _
    ByRef THETA As Double, _
    ByRef DELTA As Double, _
    ByRef GAMMA As Double, _
    ByRef LAMBDA As Double, _
    ByRef RHO As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03NEF Lib "FLDLL224M_nag.dll" ( _
    ByRef T0 As Double, _
    ByRef TMAT As Double, _
    ByRef NTD As Integer, _
    ByRef TD As Double, _
    ByRef PHID As Double, _
    ByRef PHIAV As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D03PCA_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal Q_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub D03PCA_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef IBND As Integer, _
    ByVal BETA_rptr As IntPtr, _
    ByVal GAMMA_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub D03PCA Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef M As Integer, ByRef TS As Double, _
    ByRef TOUT As Double, ByVal PDEDEF As D03PCF_PDEDEF_DELEGATE, ByVal BNDARY As D03PCF_BNDARY_DELEGATE, _
    ByRef U As Double, ByRef NPTS As Integer, ByRef X As Double, _
    ByRef ACC As Double, ByRef RSAVE As Double, ByRef LRSAVE As Integer, _
    ByRef ISAVE As Integer, ByRef LISAVE As Integer, ByRef ITASK As Integer, _
    ByRef ITRACE As Integer, ByRef IND As Integer, ByRef IUSER As Integer, _
    ByRef RUSER As Double, ByVal CWSAV As string, ByVal CWSAVLength As Integer, ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, ByRef RWSAV As Double, ByRef IFAIL As Integer _
   )

  Delegate Sub D03PCF_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal Q_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PCF_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef IBND As Integer, _
    ByVal BETA_rptr As IntPtr, _
    ByVal GAMMA_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

   Declare Sub D03PCF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, _
    ByRef M As Integer, _
    ByRef TS As Double, _
    ByRef TOUT As Double, _
    ByVal PDEDEF As D03PCF_PDEDEF_DELEGATE, _
    ByVal BNDARY As D03PCF_BNDARY_DELEGATE, _
    ByRef U As Double, _
    ByRef NPTS As Integer, _
    ByRef X As Double, _
    ByRef ACC As Double, _
    ByRef RSAVE As Double, _
    ByRef LRSAVE As Integer, _
    ByRef ISAVE As Integer, _
    ByRef LISAVE As Integer, _
    ByRef ITASK As Integer, _
    ByRef ITRACE As Integer, _
    ByRef IND As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D03PDA_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal X_rptr As IntPtr, _
    ByRef NPTL As Integer, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal Q_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub D03PDA_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef IBND As Integer, _
    ByVal BETA_rptr As IntPtr, _
    ByVal GAMMA_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub D03PDA_UINIT_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef NPTS As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub D03PDA Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef M As Integer, ByRef TS As Double, _
    ByRef TOUT As Double, ByVal PDEDEF As D03PDF_PDEDEF_DELEGATE, ByVal BNDARY As D03PDF_BNDARY_DELEGATE, _
    ByRef U As Double, ByRef NBKPTS As Integer, ByRef XBKPTS As Double, _
    ByRef NPOLY As Integer, ByRef NPTS As Integer, ByRef X As Double, _
    ByVal UINIT As D03PDF_UINIT_DELEGATE, ByRef ACC As Double, ByRef RSAVE As Double, _
    ByRef LRSAVE As Integer, ByRef ISAVE As Integer, ByRef LISAVE As Integer, _
    ByRef ITASK As Integer, ByRef ITRACE As Integer, ByRef IND As Integer, _
    ByRef IUSER As Integer, ByRef RUSER As Double, ByVal CWSAV As string, ByVal CWSAVLength As Integer, _
    ByRef LWSAV As Integer, ByRef IWSAV As Integer, ByRef RWSAV As Double, _
    ByRef IFAIL As Integer _
   )

  Delegate Sub D03PDF_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal X_rptr As IntPtr, _
    ByRef NPTL As Integer, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal Q_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PDF_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef IBND As Integer, _
    ByVal BETA_rptr As IntPtr, _
    ByVal GAMMA_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PDF_UINIT_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef NPTS As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal U_rptr As IntPtr _
  )

   Declare Sub D03PDF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef M As Integer, ByRef TS As Double, _
    ByRef TOUT As Double, ByVal PDEDEF As D03PDF_PDEDEF_DELEGATE, ByVal BNDARY As D03PDF_BNDARY_DELEGATE, _
    ByRef U As Double, ByRef NBKPTS As Integer, ByRef XBKPTS As Double, _
    ByRef NPOLY As Integer, ByRef NPTS As Integer, ByRef X As Double, _
    ByVal UINIT As D03PDF_UINIT_DELEGATE, ByRef ACC As Double, ByRef RSAVE As Double, _
    ByRef LRSAVE As Integer, ByRef ISAVE As Integer, ByRef LISAVE As Integer, _
    ByRef ITASK As Integer, ByRef ITRACE As Integer, ByRef IND As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D03PEF_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UT_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByVal RES_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PEF_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef IBND As Integer, _
    ByRef NOBC As Integer, _
    ByVal U_rptr As IntPtr, _
    ByVal UT_rptr As IntPtr, _
    ByVal RES_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

   Declare Sub D03PEF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, _
    ByRef TS As Double, _
    ByRef TOUT As Double, _
    ByVal PDEDEF As D03PEF_PDEDEF_DELEGATE, _
    ByVal BNDARY As D03PEF_BNDARY_DELEGATE, _
    ByRef U As Double, _
    ByRef NPTS As Integer, _
    ByRef X As Double, _
    ByRef NLEFT As Integer, _
    ByRef ACC As Double, _
    ByRef RSAVE As Double, _
    ByRef LRSAVE As Integer, _
    ByRef ISAVE As Integer, _
    ByRef LISAVE As Integer, _
    ByRef ITASK As Integer, _
    ByRef ITRACE As Integer, _
    ByRef IND As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D03PFF_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal D_rptr As IntPtr, _
    ByVal S_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

   Declare Sub D03PFP Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal D_rptr As IntPtr, _
    ByVal S_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PFF_NUMFLX_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal ULEFT_rptr As IntPtr, _
    ByVal URIGHT_rptr As IntPtr, _
    ByVal FLUX_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PFF_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef NPTS As Integer, _
    ByRef T As Double, _
    ByVal X_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByRef IBND As Integer, _
    ByVal G_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

   Declare Sub D03PFF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, _
    ByRef TS As Double, _
    ByRef TOUT As Double, _
    ByVal PDEDEF As D03PFF_PDEDEF_DELEGATE, _
    ByVal NUMFLX As D03PFF_NUMFLX_DELEGATE, _
    ByVal BNDARY As D03PFF_BNDARY_DELEGATE, _
    ByRef U As Double, _
    ByRef NPTS As Integer, _
    ByRef X As Double, _
    ByRef ACC As Double, _
    ByRef TSMAX As Double, _
    ByRef RSAVE As Double, _
    ByRef LRSAVE As Integer, _
    ByRef ISAVE As Integer, _
    ByRef LISAVE As Integer, _
    ByRef ITASK As Integer, _
    ByRef ITRACE As Integer, _
    ByRef IND As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D03PHA_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal Q_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub D03PHA_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef IBND As Integer, _
    ByVal BETA_rptr As IntPtr, _
    ByVal GAMMA_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub D03PHA_ODEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef NXI As Integer, _
    ByVal XI_rptr As IntPtr, _
    ByVal UCP_rptr As IntPtr, _
    ByVal UCPX_rptr As IntPtr, _
    ByVal RCP_rptr As IntPtr, _
    ByVal UCPT_rptr As IntPtr, _
    ByVal UCPTX_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub D53PCK Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef NXI As Integer, _
    ByVal XI_rptr As IntPtr, _
    ByVal UCP_rptr As IntPtr, _
    ByVal UCPX_rptr As IntPtr, _
    ByVal RCP_rptr As IntPtr, _
    ByVal UCPT_rptr As IntPtr, _
    ByVal UCPTX_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub D03PHA Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef M As Integer, ByRef TS As Double, _
    ByRef TOUT As Double, ByVal PDEDEF As D03PHF_PDEDEF_DELEGATE, ByVal BNDARY As D03PHF_BNDARY_DELEGATE, _
    ByRef U As Double, ByRef NPTS As Integer, ByRef X As Double, _
    ByRef NCODE As Integer, ByVal ODEDEF As D03PHF_ODEDEF_DELEGATE, ByRef NXI As Integer, _
    ByRef XI As Double, ByRef NEQN As Integer, ByRef RTOL As Double, _
    ByRef ATOL As Double, ByRef ITOL As Integer, ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal LAOPT As string, ByVal LAOPTLength As Integer, ByRef ALGOPT As Double, ByRef RSAVE As Double, _
    ByRef LRSAVE As Integer, ByRef ISAVE As Integer, ByRef LISAVE As Integer, _
    ByRef ITASK As Integer, ByRef ITRACE As Integer, ByRef IND As Integer, _
    ByRef IUSER As Integer, ByRef RUSER As Double, ByVal CWSAV As string, ByVal CWSAVLength As Integer, _
    ByRef LWSAV As Integer, ByRef IWSAV As Integer, ByRef RWSAV As Double, _
    ByRef IFAIL As Integer _
   )

  Delegate Sub D03PHF_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal Q_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PHF_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef IBND As Integer, _
    ByVal BETA_rptr As IntPtr, _
    ByVal GAMMA_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PHF_ODEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef NXI As Integer, _
    ByVal XI_rptr As IntPtr, _
    ByVal UCP_rptr As IntPtr, _
    ByVal UCPX_rptr As IntPtr, _
    ByVal RCP_rptr As IntPtr, _
    ByVal UCPT_rptr As IntPtr, _
    ByVal UCPTX_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

   Declare Sub D03PCK Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef NXI As Integer, _
    ByVal XI_rptr As IntPtr, _
    ByVal UCP_rptr As IntPtr, _
    ByVal UCPX_rptr As IntPtr, _
    ByVal RCP_rptr As IntPtr, _
    ByVal UCPT_rptr As IntPtr, _
    ByVal UCPTX_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

   Declare Sub D03PHF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef M As Integer, ByRef TS As Double, _
    ByRef TOUT As Double, ByVal PDEDEF As D03PHF_PDEDEF_DELEGATE, ByVal BNDARY As D03PHF_BNDARY_DELEGATE, _
    ByRef U As Double, ByRef NPTS As Integer, ByRef X As Double, _
    ByRef NCODE As Integer, ByVal ODEDEF As D03PHF_ODEDEF_DELEGATE, ByRef NXI As Integer, _
    ByRef XI As Double, ByRef NEQN As Integer, ByRef RTOL As Double, _
    ByRef ATOL As Double, ByRef ITOL As Integer, ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal LAOPT As string, ByVal LAOPTLength As Integer, ByRef ALGOPT As Double, ByRef RSAVE As Double, _
    ByRef LRSAVE As Integer, ByRef ISAVE As Integer, ByRef LISAVE As Integer, _
    ByRef ITASK As Integer, ByRef ITRACE As Integer, ByRef IND As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D03PJA_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal X_rptr As IntPtr, _
    ByRef NPTL As Integer, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal Q_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub D03PJA_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef IBND As Integer, _
    ByVal BETA_rptr As IntPtr, _
    ByVal GAMMA_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub D03PJA_ODEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef NXI As Integer, _
    ByVal XI_rptr As IntPtr, _
    ByVal UCP_rptr As IntPtr, _
    ByVal UCPX_rptr As IntPtr, _
    ByVal RCP_rptr As IntPtr, _
    ByVal UCPT_rptr As IntPtr, _
    ByVal UCPTX_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )


  Delegate Sub D03PJA_UVINIT_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef NPTS As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub D03PJA Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef M As Integer, ByRef TS As Double, _
    ByRef TOUT As Double, ByVal PDEDEF As D03PJF_PDEDEF_DELEGATE, ByVal BNDARY As D03PJF_BNDARY_DELEGATE, _
    ByRef U As Double, ByRef NBKPTS As Integer, ByRef XBKPTS As Double, _
    ByRef NPOLY As Integer, ByRef NPTS As Integer, ByRef X As Double, _
    ByRef NCODE As Integer, ByVal ODEDEF As D03PJF_ODEDEF_DELEGATE, ByRef NXI As Integer, _
    ByRef XI As Double, ByRef NEQN As Integer, ByVal UVINIT As D03PJF_UVINIT_DELEGATE, _
    ByRef RTOL As Double, ByRef ATOL As Double, ByRef ITOL As Integer, _
    ByVal NORM As string, ByVal NORMLength As Integer, ByVal LAOPT As string, ByVal LAOPTLength As Integer, ByRef ALGOPT As Double, _
    ByRef RSAVE As Double, ByRef LRSAVE As Integer, ByRef ISAVE As Integer, _
    ByRef LISAVE As Integer, ByRef ITASK As Integer, ByRef ITRACE As Integer, _
    ByRef IND As Integer, ByRef IUSER As Integer, ByRef RUSER As Double, _
    ByVal CWSAV As string, ByVal CWSAVLength As Integer, ByRef LWSAV As Integer, ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, ByRef IFAIL As Integer _
   )

  Delegate Sub D03PJF_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal X_rptr As IntPtr, _
    ByRef NPTL As Integer, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal Q_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PJF_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef IBND As Integer, _
    ByVal BETA_rptr As IntPtr, _
    ByVal GAMMA_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PJF_ODEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef NXI As Integer, _
    ByVal XI_rptr As IntPtr, _
    ByVal UCP_rptr As IntPtr, _
    ByVal UCPX_rptr As IntPtr, _
    ByVal RCP_rptr As IntPtr, _
    ByVal UCPT_rptr As IntPtr, _
    ByVal UCPTX_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef IRES As Integer _
  )


  Delegate Sub D03PJF_UVINIT_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef NPTS As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr _
  )

   Declare Sub D03PJF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef M As Integer, ByRef TS As Double, _
    ByRef TOUT As Double, ByVal PDEDEF As D03PJF_PDEDEF_DELEGATE, ByVal BNDARY As D03PJF_BNDARY_DELEGATE, _
    ByRef U As Double, ByRef NBKPTS As Integer, ByRef XBKPTS As Double, _
    ByRef NPOLY As Integer, ByRef NPTS As Integer, ByRef X As Double, _
    ByRef NCODE As Integer, ByVal ODEDEF As D03PJF_ODEDEF_DELEGATE, ByRef NXI As Integer, _
    ByRef XI As Double, ByRef NEQN As Integer, ByVal UVINIT As D03PJF_UVINIT_DELEGATE, _
    ByRef RTOL As Double, ByRef ATOL As Double, ByRef ITOL As Integer, _
    ByVal NORM As string, ByVal NORMLength As Integer, ByVal LAOPT As string, ByVal LAOPTLength As Integer, ByRef ALGOPT As Double, _
    ByRef RSAVE As Double, ByRef LRSAVE As Integer, ByRef ISAVE As Integer, _
    ByRef LISAVE As Integer, ByRef ITASK As Integer, ByRef ITRACE As Integer, _
    ByRef IND As Integer, ByRef IFAIL As Integer _
   )


  Delegate Sub D03PKF_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UT_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByVal RES_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PKF_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef IBND As Integer, _
    ByRef NOBC As Integer, _
    ByVal U_rptr As IntPtr, _
    ByVal UT_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByVal RES_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PKF_ODEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef NXI As Integer, _
    ByVal XI_rptr As IntPtr, _
    ByVal UCP_rptr As IntPtr, _
    ByVal UCPX_rptr As IntPtr, _
    ByVal UCPT_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

   Declare Sub D03PEK Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef NXI As Integer, _
    ByVal XI_rptr As IntPtr, _
    ByVal UCP_rptr As IntPtr, _
    ByVal UCPX_rptr As IntPtr, _
    ByVal UCPT_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

   Declare Sub D03PKF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef TS As Double, ByRef TOUT As Double, _
    ByVal PDEDEF As D03PKF_PDEDEF_DELEGATE, ByVal BNDARY As D03PKF_BNDARY_DELEGATE, ByRef U As Double, _
    ByRef NPTS As Integer, ByRef X As Double, ByRef NLEFT As Integer, _
    ByRef NCODE As Integer, ByVal ODEDEF As D03PKF_ODEDEF_DELEGATE, ByRef NXI As Integer, _
    ByRef XI As Double, ByRef NEQN As Integer, ByRef RTOL As Double, _
    ByRef ATOL As Double, ByRef ITOL As Integer, ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal LAOPT As string, ByVal LAOPTLength As Integer, ByRef ALGOPT As Double, ByRef RSAVE As Double, _
    ByRef LRSAVE As Integer, ByRef ISAVE As Integer, ByRef LISAVE As Integer, _
    ByRef ITASK As Integer, ByRef ITRACE As Integer, ByRef IND As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D03PLF_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal D_rptr As IntPtr, _
    ByVal S_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

   Declare Sub D03PLP Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal D_rptr As IntPtr, _
    ByVal S_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PLF_NUMFLX_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal ULEFT_rptr As IntPtr, _
    ByVal URIGHT_rptr As IntPtr, _
    ByVal FLUX_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PLF_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef NPTS As Integer, _
    ByRef T As Double, _
    ByVal X_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef IBND As Integer, _
    ByVal G_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PLF_ODEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef NXI As Integer, _
    ByVal XI_rptr As IntPtr, _
    ByVal UCP_rptr As IntPtr, _
    ByVal UCPX_rptr As IntPtr, _
    ByVal UCPT_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer _
  )


   Declare Sub D03PLF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef TS As Double, ByRef TOUT As Double, _
    ByVal PDEDEF As D03PLF_PDEDEF_DELEGATE, ByVal NUMFLX As D03PLF_NUMFLX_DELEGATE, ByVal BNDARY As D03PLF_BNDARY_DELEGATE, _
    ByRef U As Double, ByRef NPTS As Integer, ByRef X As Double, _
    ByRef NCODE As Integer, ByVal ODEDEF As D03PLF_ODEDEF_DELEGATE, ByRef NXI As Integer, _
    ByRef XI As Double, ByRef NEQN As Integer, ByRef RTOL As Double, _
    ByRef ATOL As Double, ByRef ITOL As Integer, ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal LAOPT As string, ByVal LAOPTLength As Integer, ByRef ALGOPT As Double, ByRef RSAVE As Double, _
    ByRef LRSAVE As Integer, ByRef ISAVE As Integer, ByRef LISAVE As Integer, _
    ByRef ITASK As Integer, ByRef ITRACE As Integer, ByRef IND As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D03PPA_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal Q_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub D03PPA_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef IBND As Integer, _
    ByVal BETA_rptr As IntPtr, _
    ByVal GAMMA_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub D03PPA_UVINIT_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef NPTS As Integer, _
    ByRef NXI As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal XI_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub D03PPA_ODEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef NXI As Integer, _
    ByVal XI_rptr As IntPtr, _
    ByVal UCP_rptr As IntPtr, _
    ByVal UCPX_rptr As IntPtr, _
    ByVal RCP_rptr As IntPtr, _
    ByVal UCPT_rptr As IntPtr, _
    ByVal UCPTX_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef IRES As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )


  Delegate Sub D03PPA_MONITF_DELEGATE( _
    ByRef T As Double, _
    ByRef NPTS As Integer, _
    ByRef NPDE As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByVal FMON_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub D53PCL Lib "FLDLL224M_nag.dll" ( _
    ByRef T As Double, _
    ByRef NPTS As Integer, _
    ByRef NPDE As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByVal FMON_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub D03PPA Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef M As Integer, ByRef TS As Double, _
    ByRef TOUT As Double, ByVal PDEDEF As D03PPF_PDEDEF_DELEGATE, ByVal BNDARY As D03PPF_BNDARY_DELEGATE, _
    ByVal UVINIT As D03PPF_UVINIT_DELEGATE, ByRef U As Double, ByRef NPTS As Integer, _
    ByRef X As Double, ByRef NCODE As Integer, ByVal ODEDEF As D03PPF_ODEDEF_DELEGATE, _
    ByRef NXI As Integer, ByRef XI As Double, ByRef NEQN As Integer, _
    ByRef RTOL As Double, ByRef ATOL As Double, ByRef ITOL As Integer, _
    ByVal NORM As string, ByVal NORMLength As Integer, ByVal LAOPT As string, ByVal LAOPTLength As Integer, ByRef ALGOPT As Double, _
    ByRef REMESH As Integer, ByRef NXFIX As Integer, ByRef XFIX As Double, _
    ByRef NRMESH As Integer, ByRef DXMESH As Double, ByRef TRMESH As Double, _
    ByRef IPMINF As Integer, ByRef XRATIO As Double, ByRef CON As Double, _
    ByVal MONITF As D03PPF_MONITF_DELEGATE, ByRef RSAVE As Double, ByRef LRSAVE As Integer, _
    ByRef ISAVE As Integer, ByRef LISAVE As Integer, ByRef ITASK As Integer, _
    ByRef ITRACE As Integer, ByRef IND As Integer, ByRef IUSER As Integer, _
    ByRef RUSER As Double, ByVal CWSAV As string, ByVal CWSAVLength As Integer, ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, ByRef RWSAV As Double, ByRef IFAIL As Integer _
   )

  Delegate Sub D03PPF_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal Q_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PPF_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef IBND As Integer, _
    ByVal BETA_rptr As IntPtr, _
    ByVal GAMMA_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PPF_UVINIT_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef NPTS As Integer, _
    ByRef NXI As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal XI_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr _
  )

  Delegate Sub D03PPF_ODEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef NXI As Integer, _
    ByVal XI_rptr As IntPtr, _
    ByVal UCP_rptr As IntPtr, _
    ByVal UCPX_rptr As IntPtr, _
    ByVal RCP_rptr As IntPtr, _
    ByVal UCPT_rptr As IntPtr, _
    ByVal UCPTX_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef IRES As Integer _
  )


  Delegate Sub D03PPF_MONITF_DELEGATE( _
    ByRef T As Double, _
    ByRef NPTS As Integer, _
    ByRef NPDE As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByVal FMON_rptr As IntPtr _
  )

   Declare Sub D03PCL Lib "FLDLL224M_nag.dll" ( _
    ByRef T As Double, _
    ByRef NPTS As Integer, _
    ByRef NPDE As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByVal FMON_rptr As IntPtr _
  )

   Declare Sub D03PPF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef M As Integer, ByRef TS As Double, _
    ByRef TOUT As Double, ByVal PDEDEF As D03PPF_PDEDEF_DELEGATE, ByVal BNDARY As D03PPF_BNDARY_DELEGATE, _
    ByVal UVINIT As D03PPF_UVINIT_DELEGATE, ByRef U As Double, ByRef NPTS As Integer, _
    ByRef X As Double, ByRef NCODE As Integer, ByVal ODEDEF As D03PPF_ODEDEF_DELEGATE, _
    ByRef NXI As Integer, ByRef XI As Double, ByRef NEQN As Integer, _
    ByRef RTOL As Double, ByRef ATOL As Double, ByRef ITOL As Integer, _
    ByVal NORM As string, ByVal NORMLength As Integer, ByVal LAOPT As string, ByVal LAOPTLength As Integer, ByRef ALGOPT As Double, _
    ByRef REMESH As Integer, ByRef NXFIX As Integer, ByRef XFIX As Double, _
    ByRef NRMESH As Integer, ByRef DXMESH As Double, ByRef TRMESH As Double, _
    ByRef IPMINF As Integer, ByRef XRATIO As Double, ByRef CON As Double, _
    ByVal MONITF As D03PPF_MONITF_DELEGATE, ByRef RSAVE As Double, ByRef LRSAVE As Integer, _
    ByRef ISAVE As Integer, ByRef LISAVE As Integer, ByRef ITASK As Integer, _
    ByRef ITRACE As Integer, ByRef IND As Integer, ByRef IFAIL As Integer _
   )


  Delegate Sub D03PRF_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UDOT_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByVal RES_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PRF_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef IBND As Integer, _
    ByRef NOBC As Integer, _
    ByVal U_rptr As IntPtr, _
    ByVal UDOT_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByVal RES_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PRF_UVINIT_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef NPTS As Integer, _
    ByRef NXI As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal XI_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr _
  )

  Delegate Sub D03PRF_ODEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef NXI As Integer, _
    ByVal XI_rptr As IntPtr, _
    ByVal UCP_rptr As IntPtr, _
    ByVal UCPX_rptr As IntPtr, _
    ByVal UCPT_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByRef IRES As Integer _
  )


  Delegate Sub D03PRF_MONITF_DELEGATE( _
    ByRef T As Double, _
    ByRef NPTS As Integer, _
    ByRef NPDE As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByVal FMON_rptr As IntPtr _
  )

   Declare Sub D03PEL Lib "FLDLL224M_nag.dll" ( _
    ByRef T As Double, _
    ByRef NPTS As Integer, _
    ByRef NPDE As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByVal FMON_rptr As IntPtr _
  )

   Declare Sub D03PRF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef TS As Double, ByRef TOUT As Double, _
    ByVal PDEDEF As D03PRF_PDEDEF_DELEGATE, ByVal BNDARY As D03PRF_BNDARY_DELEGATE, ByVal UVINIT As D03PRF_UVINIT_DELEGATE, _
    ByRef U As Double, ByRef NPTS As Integer, ByRef X As Double, _
    ByRef NLEFT As Integer, ByRef NCODE As Integer, ByVal ODEDEF As D03PRF_ODEDEF_DELEGATE, _
    ByRef NXI As Integer, ByRef XI As Double, ByRef NEQN As Integer, _
    ByRef RTOL As Double, ByRef ATOL As Double, ByRef ITOL As Integer, _
    ByVal NORM As string, ByVal NORMLength As Integer, ByVal LAOPT As string, ByVal LAOPTLength As Integer, ByRef ALGOPT As Double, _
    ByRef REMESH As Integer, ByRef NXFIX As Integer, ByRef XFIX As Double, _
    ByRef NRMESH As Integer, ByRef DXMESH As Double, ByRef TRMESH As Double, _
    ByRef IPMINF As Integer, ByRef XRATIO As Double, ByRef CON As Double, _
    ByVal MONITF As D03PRF_MONITF_DELEGATE, ByRef RSAVE As Double, ByRef LRSAVE As Integer, _
    ByRef ISAVE As Integer, ByRef LISAVE As Integer, ByRef ITASK As Integer, _
    ByRef ITRACE As Integer, ByRef IND As Integer, ByRef IFAIL As Integer _
   )


  Delegate Sub D03PSF_PDEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByVal U_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByVal P_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal D_rptr As IntPtr, _
    ByVal S_rptr As IntPtr, _
    ByRef IRES As Integer _
  )


  Delegate Sub D03PSF_NUMFLX_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal ULEFT_rptr As IntPtr, _
    ByVal URIGHT_rptr As IntPtr, _
    ByVal FLUX_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PSF_BNDARY_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef NPTS As Integer, _
    ByRef T As Double, _
    ByVal X_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef IBND As Integer, _
    ByVal G_rptr As IntPtr, _
    ByRef IRES As Integer _
  )

  Delegate Sub D03PSF_UVINIT_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef NPTS As Integer, _
    ByRef NXI As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal XI_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr _
  )

  Delegate Sub D03PSF_ODEDEF_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef NCODE As Integer, _
    ByVal V_rptr As IntPtr, _
    ByVal VDOT_rptr As IntPtr, _
    ByRef NXI As Integer, _
    ByVal XI_rptr As IntPtr, _
    ByVal UCP_rptr As IntPtr, _
    ByVal UCPX_rptr As IntPtr, _
    ByVal UCPT_rptr As IntPtr, _
    ByVal R_rptr As IntPtr, _
    ByRef IRES As Integer _
  )


  Delegate Sub D03PSF_MONITF_DELEGATE( _
    ByRef T As Double, _
    ByRef NPTS As Integer, _
    ByRef NPDE As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByVal FMON_rptr As IntPtr _
  )


   Declare Sub D03PSF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef TS As Double, ByRef TOUT As Double, _
    ByVal PDEDEF As D03PSF_PDEDEF_DELEGATE, ByVal NUMFLX As D03PSF_NUMFLX_DELEGATE, ByVal BNDARY As D03PSF_BNDARY_DELEGATE, _
    ByVal UVINIT As D03PSF_UVINIT_DELEGATE, ByRef U As Double, ByRef NPTS As Integer, _
    ByRef X As Double, ByRef NCODE As Integer, ByVal ODEDEF As D03PSF_ODEDEF_DELEGATE, _
    ByRef NXI As Integer, ByRef XI As Double, ByRef NEQN As Integer, _
    ByRef RTOL As Double, ByRef ATOL As Double, ByRef ITOL As Integer, _
    ByVal NORM As string, ByVal NORMLength As Integer, ByVal LAOPT As string, ByVal LAOPTLength As Integer, ByRef ALGOPT As Double, _
    ByRef REMESH As Integer, ByRef NXFIX As Integer, ByRef XFIX As Double, _
    ByRef NRMESH As Integer, ByRef DXMESH As Double, ByRef TRMESH As Double, _
    ByRef IPMINF As Integer, ByRef XRATIO As Double, ByRef CON As Double, _
    ByVal MONITF As D03PSF_MONITF_DELEGATE, ByRef RSAVE As Double, ByRef LRSAVE As Integer, _
    ByRef ISAVE As Integer, ByRef LISAVE As Integer, ByRef ITASK As Integer, _
    ByRef ITRACE As Integer, ByRef IND As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub D03PUF Lib "FLDLL224M_nag.dll" ( _
    ByRef ULEFT As Double, _
    ByRef URIGHT As Double, _
    ByRef GAMMA As Double, _
    ByRef FLUX As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03PVF Lib "FLDLL224M_nag.dll" ( _
    ByRef ULEFT As Double, _
    ByRef URIGHT As Double, _
    ByRef GAMMA As Double, _
    ByVal PATH As string, ByVal PATHLength As Integer, _
    ByRef FLUX As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03PWF Lib "FLDLL224M_nag.dll" ( _
    ByRef ULEFT As Double, _
    ByRef URIGHT As Double, _
    ByRef GAMMA As Double, _
    ByRef FLUX As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03PXF Lib "FLDLL224M_nag.dll" ( _
    ByRef ULEFT As Double, _
    ByRef URIGHT As Double, _
    ByRef GAMMA As Double, _
    ByRef TOL As Double, _
    ByRef NITER As Integer, _
    ByRef FLUX As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03PYF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, _
    ByRef U As Double, _
    ByRef NBKPTS As Integer, _
    ByRef XBKPTS As Double, _
    ByRef NPOLY As Integer, _
    ByRef NPTS As Integer, _
    ByRef XP As Double, _
    ByRef INTPTS As Integer, _
    ByRef ITYPE As Integer, _
    ByRef UP As Double, _
    ByRef RSAVE As Double, _
    ByRef LRSAVE As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03PZF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, _
    ByRef M As Integer, _
    ByRef U As Double, _
    ByRef NPTS As Integer, _
    ByRef X As Double, _
    ByRef XP As Double, _
    ByRef INTPTS As Integer, _
    ByRef ITYPE As Integer, _
    ByRef UP As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub D03RAF_PDEDEF_DELEGATE( _
    ByRef NPTS As Integer, _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal X_rptr As IntPtr, _
    ByVal Y_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByVal UT_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByVal UY_rptr As IntPtr, _
    ByVal UXX_rptr As IntPtr, _
    ByVal UXY_rptr As IntPtr, _
    ByVal UYY_rptr As IntPtr, _
    ByVal RES_rptr As IntPtr _
  )

  Delegate Sub D03RAF_BNDARY_DELEGATE( _
    ByRef NPTS As Integer, _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal X_rptr As IntPtr, _
    ByVal Y_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByVal UT_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByVal UY_rptr As IntPtr, _
    ByRef NBPTS As Integer, _
    ByVal LBND_iptr As IntPtr, _
    ByVal RES_rptr As IntPtr _
  )

  Delegate Sub D03RAF_PDEIV_DELEGATE( _
    ByRef NPTS As Integer, _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal X_rptr As IntPtr, _
    ByVal Y_rptr As IntPtr, _
    ByVal U_rptr As IntPtr _
  )

  Delegate Sub D03RAF_MONITR_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef DT As Double, _
    ByRef DTNEW As Double, _
    ByRef TLAST As Integer, _
    ByRef NLEV As Integer, _
    ByVal NGPTS_iptr As IntPtr, _
    ByVal XPTS_rptr As IntPtr, _
    ByVal YPTS_rptr As IntPtr, _
    ByVal LSOL_iptr As IntPtr, _
    ByVal SOL_rptr As IntPtr, _
    ByRef IERR As Integer _
  )

   Declare Sub D03RAF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef TS As Double, ByRef TOUT As Double, _
    ByRef DT As Double, ByRef XMIN As Double, ByRef XMAX As Double, _
    ByRef YMIN As Double, ByRef YMAX As Double, ByRef NX As Integer, _
    ByRef NY As Integer, ByRef TOLS As Double, ByRef TOLT As Double, _
    ByVal PDEDEF As D03RAF_PDEDEF_DELEGATE, ByVal BNDARY As D03RAF_BNDARY_DELEGATE, ByVal PDEIV As D03RAF_PDEIV_DELEGATE, _
    ByVal MONITR As D03RAF_MONITR_DELEGATE, ByRef OPTI As Integer, ByRef OPTR As Double, _
    ByRef RWK As Double, ByRef LENRWK As Integer, ByRef IWK As Integer, _
    ByRef LENIWK As Integer, ByRef LWK As Integer, ByRef LENLWK As Integer, _
    ByRef ITRACE As Integer, ByRef IND As Integer, ByRef IFAIL As Integer _
   )


  Delegate Sub D03RBF_INIDOM_DELEGATE( _
    ByRef MAXPTS As Integer, _
    ByRef XMIN As Double, _
    ByRef XMAX As Double, _
    ByRef YMIN As Double, _
    ByRef YMAX As Double, _
    ByRef NX As Integer, _
    ByRef NY As Integer, _
    ByRef NPTS As Integer, _
    ByRef NROWS As Integer, _
    ByRef NBNDS As Integer, _
    ByRef NBPTS As Integer, _
    ByVal LROW_iptr As IntPtr, _
    ByVal IROW_iptr As IntPtr, _
    ByVal ICOL_iptr As IntPtr, _
    ByVal LLBND_iptr As IntPtr, _
    ByVal ILBND_iptr As IntPtr, _
    ByVal LBND_iptr As IntPtr, _
    ByRef IERR As Integer _
  )

  Delegate Sub D03RBF_PDEDEF_DELEGATE( _
    ByRef NPTS As Integer, _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal X_rptr As IntPtr, _
    ByVal Y_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByVal UT_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByVal UY_rptr As IntPtr, _
    ByVal UXX_rptr As IntPtr, _
    ByVal UXY_rptr As IntPtr, _
    ByVal UYY_rptr As IntPtr, _
    ByVal RES_rptr As IntPtr _
  )

  Delegate Sub D03RBF_BNDARY_DELEGATE( _
    ByRef NPTS As Integer, _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal X_rptr As IntPtr, _
    ByVal Y_rptr As IntPtr, _
    ByVal U_rptr As IntPtr, _
    ByVal UT_rptr As IntPtr, _
    ByVal UX_rptr As IntPtr, _
    ByVal UY_rptr As IntPtr, _
    ByRef NBNDS As Integer, _
    ByRef NBPTS As Integer, _
    ByVal LLBND_iptr As IntPtr, _
    ByVal ILBND_iptr As IntPtr, _
    ByVal LBND_iptr As IntPtr, _
    ByVal RES_rptr As IntPtr _
  )

  Delegate Sub D03RBF_PDEIV_DELEGATE( _
    ByRef NPTS As Integer, _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByVal X_rptr As IntPtr, _
    ByVal Y_rptr As IntPtr, _
    ByVal U_rptr As IntPtr _
  )

  Delegate Sub D03RBF_MONITR_DELEGATE( _
    ByRef NPDE As Integer, _
    ByRef T As Double, _
    ByRef DT As Double, _
    ByRef DTNEW As Double, _
    ByRef TLAST As Integer, _
    ByRef NLEV As Integer, _
    ByRef XMIN As Double, _
    ByRef YMIN As Double, _
    ByRef DXB As Double, _
    ByRef DYB As Double, _
    ByVal LGRID_iptr As IntPtr, _
    ByVal ISTRUC_iptr As IntPtr, _
    ByVal LSOL_iptr As IntPtr, _
    ByVal SOL_rptr As IntPtr, _
    ByRef IERR As Integer _
  )

   Declare Sub D03RBF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPDE As Integer, ByRef TS As Double, ByRef TOUT As Double, _
    ByRef DT As Double, ByRef TOLS As Double, ByRef TOLT As Double, _
    ByVal INIDOM As D03RBF_INIDOM_DELEGATE, ByVal PDEDEF As D03RBF_PDEDEF_DELEGATE, ByVal BNDARY As D03RBF_BNDARY_DELEGATE, _
    ByVal PDEIV As D03RBF_PDEIV_DELEGATE, ByVal MONITR As D03RBF_MONITR_DELEGATE, ByRef OPTI As Integer, _
    ByRef OPTR As Double, ByRef RWK As Double, ByRef LENRWK As Integer, _
    ByRef IWK As Integer, ByRef LENIWK As Integer, ByRef LWK As Integer, _
    ByRef LENLWK As Integer, ByRef ITRACE As Integer, ByRef IND As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03RYF Lib "FLDLL224M_nag.dll" ( _
    ByRef NX As Integer, _
    ByRef NY As Integer, _
    ByRef NPTS As Integer, _
    ByRef NROWS As Integer, _
    ByRef NBNDS As Integer, _
    ByRef NBPTS As Integer, _
    ByRef LROW As Integer, _
    ByRef IROW As Integer, _
    ByRef ICOL As Integer, _
    ByRef LLBND As Integer, _
    ByRef ILBND As Integer, _
    ByRef LBND As Integer, _
    ByRef IWK As Integer, _
    ByRef LENIWK As Integer, _
    ByVal PGRID As string, ByVal PGRIDLength As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03RZF Lib "FLDLL224M_nag.dll" ( _
    ByRef LEVEL As Integer, _
    ByRef NLEV As Integer, _
    ByRef XMIN As Double, _
    ByRef YMIN As Double, _
    ByRef DXB As Double, _
    ByRef DYB As Double, _
    ByRef LGRID As Integer, _
    ByRef ISTRUC As Integer, _
    ByRef NPTS As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef LENXY As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03UAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N1 As Integer, _
    ByRef N2 As Integer, _
    ByRef LDA As Integer, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef C As Double, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef APARAM As Double, _
    ByRef IT As Integer, _
    ByRef R As Double, _
    ByRef WRKSP1 As Double, _
    ByRef WRKSP2 As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D03UBF Lib "FLDLL224M_nag.dll" ( _
    ByRef N1 As Integer, _
    ByRef N2 As Integer, _
    ByRef N3 As Integer, _
    ByRef LDA As Integer, _
    ByRef SDA As Integer, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef C As Double, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef F As Double, _
    ByRef G As Double, _
    ByRef APARAM As Double, _
    ByRef IT As Integer, _
    ByRef R As Double, _
    ByRef WRKSP1 As Double, _
    ByRef WRKSP2 As Double, _
    ByRef WRKSP3 As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D04AAF_FUN_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Sub D04AAF Lib "FLDLL224M_nag.dll" ( _
    ByRef XVAL As Double, _
    ByRef NDER As Integer, _
    ByRef HBASE As Double, _
    ByRef DER As Double, _
    ByRef EREST As Double, _
    ByVal FUN As D04AAF_FUN_DELEGATE, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D05AAF_K1_DELEGATE( _
    ByRef X As Double, _
    ByRef S As Double _
  ) as Double

  Delegate Function D05AAF_K2_DELEGATE( _
    ByRef X As Double, _
    ByRef S As Double _
  ) as Double

  Delegate Function D05AAF_G_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Sub D05AAF Lib "FLDLL224M_nag.dll" ( _
    ByRef LAMBDA As Double, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByVal K1 As D05AAF_K1_DELEGATE, _
    ByVal K2 As D05AAF_K2_DELEGATE, _
    ByVal G As D05AAF_G_DELEGATE, _
    ByRef F As Double, _
    ByRef C As Double, _
    ByRef N As Integer, _
    ByRef IND As Integer, _
    ByRef W1 As Double, _
    ByRef W2 As Double, _
    ByRef WD As Double, _
    ByRef LDW1 As Integer, _
    ByRef LDW2 As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D05ABF_K_DELEGATE( _
    ByRef X As Double, _
    ByRef S As Double _
  ) as Double

  Delegate Function D05ABF_G_DELEGATE( _
    ByRef X As Double _
  ) as Double

   Declare Sub D05ABF Lib "FLDLL224M_nag.dll" ( _
    ByVal K As D05ABF_K_DELEGATE, _
    ByVal G As D05ABF_G_DELEGATE, _
    ByRef LAMBDA As Double, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef ODOREV As Integer, _
    ByRef EV As Integer, _
    ByRef N As Integer, _
    ByRef CM As Double, _
    ByRef F1 As Double, _
    ByRef WK As Double, _
    ByRef LDCM As Integer, _
    ByRef NT2P1 As Integer, _
    ByRef F As Double, _
    ByRef C As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D05BAF_CK_DELEGATE( _
    ByRef T As Double _
  ) as Double

  Delegate Function D05BAF_CG_DELEGATE( _
    ByRef S As Double, _
    ByRef Y As Double _
  ) as Double

  Delegate Function D05BAF_CF_DELEGATE( _
    ByRef T As Double _
  ) as Double

   Declare Sub D05BAF Lib "FLDLL224M_nag.dll" ( _
    ByVal CK As D05BAF_CK_DELEGATE, _
    ByVal CG As D05BAF_CG_DELEGATE, _
    ByVal CF As D05BAF_CF_DELEGATE, _
    ByVal METHOD As string, ByVal METHODLength As Integer, _
    ByRef IORDER As Integer, _
    ByRef ALIM As Double, _
    ByRef TLIM As Double, _
    ByRef YN As Double, _
    ByRef ERREST As Double, _
    ByRef NMESH As Integer, _
    ByRef TOL As Double, _
    ByRef THRESH As Double, _
    ByRef WORK As Double, _
    ByRef LWK As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D05BDF_CK_DELEGATE( _
    ByRef T As Double _
  ) as Double

  Delegate Function D05BDF_CF_DELEGATE( _
    ByRef T As Double _
  ) as Double

  Delegate Function D05BDF_CG_DELEGATE( _
    ByRef S As Double, _
    ByRef Y As Double _
  ) as Double

   Declare Sub D05BDF Lib "FLDLL224M_nag.dll" ( _
    ByVal CK As D05BDF_CK_DELEGATE, _
    ByVal CF As D05BDF_CF_DELEGATE, _
    ByVal CG As D05BDF_CG_DELEGATE, _
    ByVal INITWT As string, ByVal INITWTLength As Integer, _
    ByRef IORDER As Integer, _
    ByRef TLIM As Double, _
    ByRef TOLNL As Double, _
    ByRef NMESH As Integer, _
    ByRef YN As Double, _
    ByRef WORK As Double, _
    ByRef LWK As Integer, _
    ByRef NCT As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D05BEF_CK_DELEGATE( _
    ByRef T As Double _
  ) as Double

  Delegate Function D05BEF_CF_DELEGATE( _
    ByRef T As Double _
  ) as Double

  Delegate Function D05BEF_CG_DELEGATE( _
    ByRef S As Double, _
    ByRef Y As Double _
  ) as Double

   Declare Sub D05BEF Lib "FLDLL224M_nag.dll" ( _
    ByVal CK As D05BEF_CK_DELEGATE, _
    ByVal CF As D05BEF_CF_DELEGATE, _
    ByVal CG As D05BEF_CG_DELEGATE, _
    ByVal INITWT As string, ByVal INITWTLength As Integer, _
    ByRef IORDER As Integer, _
    ByRef TLIM As Double, _
    ByRef TOLNL As Double, _
    ByRef NMESH As Integer, _
    ByRef YN As Double, _
    ByRef WORK As Double, _
    ByRef LWK As Integer, _
    ByRef NCT As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D05BWF Lib "FLDLL224M_nag.dll" ( _
    ByVal METHOD As string, ByVal METHODLength As Integer, _
    ByRef IORDER As Integer, _
    ByRef OMEGA As Double, _
    ByRef NOMG As Integer, _
    ByRef LENSW As Integer, _
    ByRef SW As Double, _
    ByRef LDSW As Integer, _
    ByRef NWT As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D05BYF Lib "FLDLL224M_nag.dll" ( _
    ByRef IORDER As Integer, _
    ByRef IQ As Integer, _
    ByRef LENFW As Integer, _
    ByRef WT As Double, _
    ByRef SW As Double, _
    ByRef LDSW As Integer, _
    ByRef WORK As Double, _
    ByRef LWK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D06AAF Lib "FLDLL224M_nag.dll" ( _
    ByRef NVB As Integer, _
    ByRef NVMAX As Integer, _
    ByRef NEDGE As Integer, _
    ByRef EDGE As Integer, _
    ByRef NV As Integer, _
    ByRef NELT As Integer, _
    ByRef COOR As Double, _
    ByRef CONN As Integer, _
    ByRef BSPACE As Double, _
    ByRef SMOOTH As Integer, _
    ByRef COEF As Double, _
    ByRef POWER As Double, _
    ByRef ITRACE As Integer, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D06ABF Lib "FLDLL224M_nag.dll" ( _
    ByRef NVB As Integer, _
    ByRef NVINT As Integer, _
    ByRef NVMAX As Integer, _
    ByRef NEDGE As Integer, _
    ByRef EDGE As Integer, _
    ByRef NV As Integer, _
    ByRef NELT As Integer, _
    ByRef COOR As Double, _
    ByRef CONN As Integer, _
    ByRef WEIGHT As Double, _
    ByRef NPROPA As Integer, _
    ByRef ITRACE As Integer, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D06ACF Lib "FLDLL224M_nag.dll" ( _
    ByRef NVB As Integer, _
    ByRef NVINT As Integer, _
    ByRef NVMAX As Integer, _
    ByRef NEDGE As Integer, _
    ByRef EDGE As Integer, _
    ByRef NV As Integer, _
    ByRef NELT As Integer, _
    ByRef COOR As Double, _
    ByRef CONN As Integer, _
    ByRef WEIGHT As Double, _
    ByRef ITRACE As Integer, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function D06BAF_FBND_DELEGATE( _
    ByRef I As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByVal RUSER_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr _
  ) as Double

   Declare Function D06BAD Lib "FLDLL224M_nag.dll" ( _
    ByRef I As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByVal RUSER_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr _
  ) as Double

   Declare Sub D06BAF Lib "FLDLL224M_nag.dll" ( _
    ByRef NLINES As Integer, ByRef COORCH As Double, ByRef LINED As Integer, _
    ByVal FBND As D06BAF_FBND_DELEGATE, ByRef CRUS As Double, ByRef SDCRUS As Integer, _
    ByRef RATE As Double, ByRef NCOMP As Integer, ByRef NLCOMP As Integer, _
    ByRef LCOMP As Integer, ByRef NVMAX As Integer, ByRef NEDMX As Integer, _
    ByRef NVB As Integer, ByRef COOR As Double, ByRef NEDGE As Integer, _
    ByRef EDGE As Integer, ByRef ITRACE As Integer, ByRef RUSER As Double, _
    ByRef IUSER As Integer, ByRef RWORK As Double, ByRef LRWORK As Integer, _
    ByRef IWORK As Integer, ByRef LIWORK As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub D06CAF Lib "FLDLL224M_nag.dll" ( _
    ByRef NV As Integer, _
    ByRef NELT As Integer, _
    ByRef NEDGE As Integer, _
    ByRef COOR As Double, _
    ByRef EDGE As Integer, _
    ByRef CONN As Integer, _
    ByRef NVFIX As Integer, _
    ByRef NUMFIX As Integer, _
    ByRef ITRACE As Integer, _
    ByRef NQINT As Integer, _
    ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D06CBF Lib "FLDLL224M_nag.dll" ( _
    ByRef NV As Integer, _
    ByRef NELT As Integer, _
    ByRef NNZMAX As Integer, _
    ByRef CONN As Integer, _
    ByRef NNZ As Integer, _
    ByRef IROW As Integer, _
    ByRef ICOL As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D06CCF Lib "FLDLL224M_nag.dll" ( _
    ByRef NV As Integer, _
    ByRef NELT As Integer, _
    ByRef NEDGE As Integer, _
    ByRef NNZMAX As Integer, _
    ByRef NNZ As Integer, _
    ByRef COOR As Double, _
    ByRef EDGE As Integer, _
    ByRef CONN As Integer, _
    ByRef IROW As Integer, _
    ByRef ICOL As Integer, _
    ByRef ITRACE As Integer, _
    ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D06DAF Lib "FLDLL224M_nag.dll" ( _
    ByRef NV As Integer, _
    ByRef NEDGE As Integer, _
    ByRef NELT As Integer, _
    ByRef NTRANS As Integer, _
    ByRef ITYPE As Integer, _
    ByRef TRANS As Double, _
    ByRef COORI As Double, _
    ByRef EDGEI As Integer, _
    ByRef CONNI As Integer, _
    ByRef COORO As Double, _
    ByRef EDGEO As Integer, _
    ByRef CONNO As Integer, _
    ByRef ITRACE As Integer, _
    ByRef RWORK As Double, _
    ByRef LRWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub D06DBF Lib "FLDLL224M_nag.dll" ( _
    ByRef EPS As Double, ByRef NV1 As Integer, ByRef NELT1 As Integer, _
    ByRef NEDGE1 As Integer, ByRef COOR1 As Double, ByRef EDGE1 As Integer, _
    ByRef CONN1 As Integer, ByRef REFT1 As Integer, ByRef NV2 As Integer, _
    ByRef NELT2 As Integer, ByRef NEDGE2 As Integer, ByRef COOR2 As Double, _
    ByRef EDGE2 As Integer, ByRef CONN2 As Integer, ByRef REFT2 As Integer, _
    ByRef NV3 As Integer, ByRef NELT3 As Integer, ByRef NEDGE3 As Integer, _
    ByRef COOR3 As Double, ByRef EDGE3 As Integer, ByRef CONN3 As Integer, _
    ByRef REFT3 As Integer, ByRef ITRACE As Integer, ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub E01AAF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef C As Double, _
    ByRef N1 As Integer, _
    ByRef N2 As Integer, _
    ByRef N As Integer, _
    ByRef X As Double _
   )


   Declare Sub E01ABF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef P As Double, _
    ByRef A As Double, _
    ByRef G As Double, _
    ByRef N1 As Integer, _
    ByRef N2 As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01AEF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef XMIN As Double, _
    ByRef XMAX As Double, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef IP As Integer, _
    ByRef N As Integer, _
    ByRef ITMIN As Integer, _
    ByRef ITMAX As Integer, _
    ByRef A As Double, _
    ByRef WRK As Double, _
    ByRef LWRK As Integer, _
    ByRef IWRK As Integer, _
    ByRef LIWRK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01BAF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef LAMDA As Double, _
    ByRef C As Double, _
    ByRef LCK As Integer, _
    ByRef WRK As Double, _
    ByRef LWRK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01BEF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef D As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01BFF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef D As Double, _
    ByRef M As Integer, _
    ByRef PX As Double, _
    ByRef PF As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01BGF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef D As Double, _
    ByRef M As Integer, _
    ByRef PX As Double, _
    ByRef PF As Double, _
    ByRef PD As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01BHF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef D As Double, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef PINT As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01DAF Lib "FLDLL224M_nag.dll" ( _
    ByRef MX As Integer, _
    ByRef MY As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef F As Double, _
    ByRef PX As Integer, _
    ByRef PY As Integer, _
    ByRef LAMDA As Double, _
    ByRef MU As Double, _
    ByRef C As Double, _
    ByRef WRK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01RAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef M As Integer, _
    ByRef A As Double, _
    ByRef U As Double, _
    ByRef IW As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01RBF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef A As Double, _
    ByRef U As Double, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01SAF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef F As Double, _
    ByRef TRIANG As Integer, _
    ByRef GRADS As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01SBF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef F As Double, _
    ByRef TRIANG As Integer, _
    ByRef GRADS As Double, _
    ByRef PX As Double, _
    ByRef PY As Double, _
    ByRef PF As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01SGF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef F As Double, _
    ByRef NW As Integer, _
    ByRef NQ As Integer, _
    ByRef IQ As Integer, _
    ByRef LIQ As Integer, _
    ByRef RQ As Double, _
    ByRef LRQ As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01SHF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef F As Double, _
    ByRef IQ As Integer, _
    ByRef LIQ As Integer, _
    ByRef RQ As Double, _
    ByRef LRQ As Integer, _
    ByRef N As Integer, _
    ByRef U As Double, _
    ByRef V As Double, _
    ByRef Q As Double, _
    ByRef QX As Double, _
    ByRef QY As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01TGF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef Z As Double, _
    ByRef F As Double, _
    ByRef NW As Integer, _
    ByRef NQ As Integer, _
    ByRef IQ As Integer, _
    ByRef LIQ As Integer, _
    ByRef RQ As Double, _
    ByRef LRQ As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E01THF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef Z As Double, _
    ByRef F As Double, _
    ByRef IQ As Integer, _
    ByRef LIQ As Integer, _
    ByRef RQ As Double, _
    ByRef LRQ As Integer, _
    ByRef N As Integer, _
    ByRef U As Double, _
    ByRef V As Double, _
    ByRef W As Double, _
    ByRef Q As Double, _
    ByRef QX As Double, _
    ByRef QY As Double, _
    ByRef QZ As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02ACF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef M1 As Integer, _
    ByRef REF As Double _
   )


   Declare Sub E02ADF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef KPLUS1 As Integer, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef W As Double, _
    ByRef WORK1 As Double, _
    ByRef WORK2 As Double, _
    ByRef A As Double, _
    ByRef S As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02AEF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPLUS1 As Integer, _
    ByRef A As Double, _
    ByRef XCAP As Double, _
    ByRef P As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02AFF Lib "FLDLL224M_nag.dll" ( _
    ByRef NPLUS1 As Integer, _
    ByRef F As Double, _
    ByRef A As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02AGF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, ByRef KPLUS1 As Integer, ByRef LDA As Integer, _
    ByRef XMIN As Double, ByRef XMAX As Double, ByRef X As Double, _
    ByRef Y As Double, ByRef W As Double, ByRef MF As Integer, _
    ByRef XF As Double, ByRef YF As Double, ByRef LYF As Integer, _
    ByRef IP As Integer, ByRef A As Double, ByRef S As Double, _
    ByRef NP1 As Integer, ByRef WRK As Double, ByRef LWRK As Integer, _
    ByRef IWRK As Integer, ByRef LIWRK As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub E02AHF Lib "FLDLL224M_nag.dll" ( _
    ByRef NP1 As Integer, _
    ByRef XMIN As Double, _
    ByRef XMAX As Double, _
    ByRef A As Double, _
    ByRef IA1 As Integer, _
    ByRef LA As Integer, _
    ByRef PATM1 As Double, _
    ByRef ADIF As Double, _
    ByRef IADIF1 As Integer, _
    ByRef LADIF As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02AJF Lib "FLDLL224M_nag.dll" ( _
    ByRef NP1 As Integer, _
    ByRef XMIN As Double, _
    ByRef XMAX As Double, _
    ByRef A As Double, _
    ByRef IA1 As Integer, _
    ByRef LA As Integer, _
    ByRef QATM1 As Double, _
    ByRef AINT As Double, _
    ByRef IAINT1 As Integer, _
    ByRef LAINT As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02AKF Lib "FLDLL224M_nag.dll" ( _
    ByRef NP1 As Integer, _
    ByRef XMIN As Double, _
    ByRef XMAX As Double, _
    ByRef A As Double, _
    ByRef IA1 As Integer, _
    ByRef LA As Integer, _
    ByRef X As Double, _
    ByRef RESULT As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02BAF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef NCAP7 As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef W As Double, _
    ByRef LAMDA As Double, _
    ByRef WORK1 As Double, _
    ByRef WORK2 As Double, _
    ByRef C As Double, _
    ByRef SS As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02BBF Lib "FLDLL224M_nag.dll" ( _
    ByRef NCAP7 As Integer, _
    ByRef LAMDA As Double, _
    ByRef C As Double, _
    ByRef X As Double, _
    ByRef S As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02BCF Lib "FLDLL224M_nag.dll" ( _
    ByRef NCAP7 As Integer, _
    ByRef LAMDA As Double, _
    ByRef C As Double, _
    ByRef X As Double, _
    ByRef LEFT As Integer, _
    ByRef S As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02BDF Lib "FLDLL224M_nag.dll" ( _
    ByRef NCAP7 As Integer, _
    ByRef LAMDA As Double, _
    ByRef C As Double, _
    ByRef DINT As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02BEF Lib "FLDLL224M_nag.dll" ( _
    ByVal START As string, ByVal STARTLength As Integer, _
    ByRef M As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef W As Double, _
    ByRef S As Double, _
    ByRef NEST As Integer, _
    ByRef N As Integer, _
    ByRef LAMDA As Double, _
    ByRef C As Double, _
    ByRef FP As Double, _
    ByRef WRK As Double, _
    ByRef LWRK As Integer, _
    ByRef IWRK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02CAF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, ByRef N As Integer, ByRef K As Integer, _
    ByRef L As Integer, ByRef X As Double, ByRef Y As Double, _
    ByRef F As Double, ByRef W As Double, ByRef MTOT As Integer, _
    ByRef A As Double, ByRef NA As Integer, ByRef XMIN As Double, _
    ByRef XMAX As Double, ByRef NUX As Double, ByRef INUXP1 As Integer, _
    ByRef NUY As Double, ByRef INUYP1 As Integer, ByRef WORK As Double, _
    ByRef NWORK As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub E02CBF Lib "FLDLL224M_nag.dll" ( _
    ByRef MFIRST As Integer, _
    ByRef MLAST As Integer, _
    ByRef K As Integer, _
    ByRef L As Integer, _
    ByRef X As Double, _
    ByRef XMIN As Double, _
    ByRef XMAX As Double, _
    ByRef Y As Double, _
    ByRef YMIN As Double, _
    ByRef YMAX As Double, _
    ByRef FF As Double, _
    ByRef A As Double, _
    ByRef NA As Integer, _
    ByRef WORK As Double, _
    ByRef NWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02DAF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, ByRef PX As Integer, ByRef PY As Integer, _
    ByRef X As Double, ByRef Y As Double, ByRef F As Double, _
    ByRef W As Double, ByRef LAMDA As Double, ByRef MU As Double, _
    ByRef POINT As Integer, ByRef NPOINT As Integer, ByRef DL As Double, _
    ByRef C As Double, ByRef NC As Integer, ByRef WS As Double, _
    ByRef NWS As Integer, ByRef EPS As Double, ByRef SIGMA As Double, _
    ByRef RANK As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub E02DCF Lib "FLDLL224M_nag.dll" ( _
    ByVal START As string, ByVal STARTLength As Integer, ByRef MX As Integer, ByRef X As Double, _
    ByRef MY As Integer, ByRef Y As Double, ByRef F As Double, _
    ByRef S As Double, ByRef NXEST As Integer, ByRef NYEST As Integer, _
    ByRef NX As Integer, ByRef LAMDA As Double, ByRef NY As Integer, _
    ByRef MU As Double, ByRef C As Double, ByRef FP As Double, _
    ByRef WRK As Double, ByRef LWRK As Integer, ByRef IWRK As Integer, _
    ByRef LIWRK As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub E02DDF Lib "FLDLL224M_nag.dll" ( _
    ByVal START As string, ByVal STARTLength As Integer, ByRef M As Integer, ByRef X As Double, _
    ByRef Y As Double, ByRef F As Double, ByRef W As Double, _
    ByRef S As Double, ByRef NXEST As Integer, ByRef NYEST As Integer, _
    ByRef NX As Integer, ByRef LAMDA As Double, ByRef NY As Integer, _
    ByRef MU As Double, ByRef C As Double, ByRef FP As Double, _
    ByRef RANK As Integer, ByRef WRK As Double, ByRef LWRK As Integer, _
    ByRef IWRK As Integer, ByRef LIWRK As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub E02DEF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef PX As Integer, _
    ByRef PY As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef LAMDA As Double, _
    ByRef MU As Double, _
    ByRef C As Double, _
    ByRef FF As Double, _
    ByRef WRK As Double, _
    ByRef IWRK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02DFF Lib "FLDLL224M_nag.dll" ( _
    ByRef MX As Integer, _
    ByRef MY As Integer, _
    ByRef PX As Integer, _
    ByRef PY As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef LAMDA As Double, _
    ByRef MU As Double, _
    ByRef C As Double, _
    ByRef FF As Double, _
    ByRef WRK As Double, _
    ByRef LWRK As Integer, _
    ByRef IWRK As Integer, _
    ByRef LIWRK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02GAF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef NPLUS2 As Integer, _
    ByRef TOLER As Double, _
    ByRef X As Double, _
    ByRef RESID As Double, _
    ByRef IRANK As Integer, _
    ByRef ITER As Integer, _
    ByRef IWORK As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E02GBF_MONIT_DELEGATE( _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef NITER As Integer, _
    ByRef K As Integer, _
    ByRef EL1N As Double _
  )

   Declare Sub E02GBF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef MPL As Integer, _
    ByRef E As Double, _
    ByRef LDE As Integer, _
    ByRef F As Double, _
    ByRef X As Double, _
    ByRef MXS As Integer, _
    ByVal MONIT As E02GBF_MONIT_DELEGATE, _
    ByRef IPRINT As Integer, _
    ByRef K As Integer, _
    ByRef EL1N As Double, _
    ByRef INDX As Integer, _
    ByRef W As Double, _
    ByRef IW As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02GCF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef SDA As Integer, _
    ByRef LDA As Integer, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef TOL As Double, _
    ByRef RELERR As Double, _
    ByRef X As Double, _
    ByRef RESMAX As Double, _
    ByRef IRANK As Integer, _
    ByRef ITER As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02RAF Lib "FLDLL224M_nag.dll" ( _
    ByRef IA As Integer, _
    ByRef IB As Integer, _
    ByRef C As Double, _
    ByRef IC As Integer, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef W As Double, _
    ByRef JW As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02RBF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef IA As Integer, _
    ByRef B As Double, _
    ByRef IB As Integer, _
    ByRef X As Double, _
    ByRef ANS As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E02ZAF Lib "FLDLL224M_nag.dll" ( _
    ByRef PX As Integer, _
    ByRef PY As Integer, _
    ByRef LAMDA As Double, _
    ByRef MU As Double, _
    ByRef M As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef POINT As Integer, _
    ByRef NPOINT As Integer, _
    ByRef ADRES As Integer, _
    ByRef NADRES As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04ABA_FUNCT_DELEGATE( _
    ByRef XC As Double, _
    ByRef FC As Double, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04ABA Lib "FLDLL224M_nag.dll" ( _
    ByVal FUNCT As E04ABF_FUNCT_DELEGATE, _
    ByRef E1 As Double, _
    ByRef E2 As Double, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef MAXCAL As Integer, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )

  Delegate Sub E04ABF_FUNCT_DELEGATE( _
    ByRef XC As Double, _
    ByRef FC As Double _
  )

   Declare Sub E04ABF Lib "FLDLL224M_nag.dll" ( _
    ByVal FUNCT As E04ABF_FUNCT_DELEGATE, _
    ByRef E1 As Double, _
    ByRef E2 As Double, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef MAXCAL As Integer, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04BBA_FUNCT_DELEGATE( _
    ByRef XC As Double, _
    ByRef FC As Double, _
    ByRef GC As Double, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04BBA Lib "FLDLL224M_nag.dll" ( _
    ByVal FUNCT As E04BBF_FUNCT_DELEGATE, _
    ByRef E1 As Double, _
    ByRef E2 As Double, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef MAXCAL As Integer, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef G As Double, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )

  Delegate Sub E04BBF_FUNCT_DELEGATE( _
    ByRef XC As Double, _
    ByRef FC As Double, _
    ByRef GC As Double _
  )

   Declare Sub E04BBF Lib "FLDLL224M_nag.dll" ( _
    ByVal FUNCT As E04BBF_FUNCT_DELEGATE, _
    ByRef E1 As Double, _
    ByRef E2 As Double, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef MAXCAL As Integer, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef G As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04CBF_FUNCT_DELEGATE( _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByRef FC As Double, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub E04CBF_MONIT_DELEGATE( _
    ByRef FMIN As Double, _
    ByRef FMAX As Double, _
    ByVal SIM_rptr As IntPtr, _
    ByRef N As Integer, _
    ByRef NCALL As Integer, _
    ByRef SERROR As Double, _
    ByRef VRATIO As Double, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04CBF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef TOLF As Double, _
    ByRef TOLX As Double, _
    ByVal FUNCT As E04CBF_FUNCT_DELEGATE, _
    ByVal MONIT As E04CBF_MONIT_DELEGATE, _
    ByRef MAXCAL As Integer, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04CCA_FUNCT_DELEGATE( _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByRef FC As Double, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub E04CCA_MONIT_DELEGATE( _
    ByRef FMIN As Double, _
    ByRef FMAX As Double, _
    ByVal SIM_rptr As IntPtr, _
    ByRef N As Integer, _
    ByRef NVERT As Integer, _
    ByRef NCALL As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04CCA Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef TOL As Double, _
    ByRef IW As Integer, _
    ByRef W1 As Double, _
    ByRef W2 As Double, _
    ByRef W3 As Double, _
    ByRef W4 As Double, _
    ByRef W5 As Double, _
    ByRef W6 As Double, _
    ByVal FUNCT As E04CCF_FUNCT_DELEGATE, _
    ByVal MONIT As E04CCF_MONIT_DELEGATE, _
    ByRef MAXCAL As Integer, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )

  Delegate Sub E04CCF_FUNCT_DELEGATE( _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByRef FC As Double _
  )

  Delegate Sub E04CCF_MONIT_DELEGATE( _
    ByRef FMIN As Double, _
    ByRef FMAX As Double, _
    ByVal SIM_rptr As IntPtr, _
    ByRef N As Integer, _
    ByRef NVERT As Integer, _
    ByRef NCALL As Integer _
  )

   Declare Sub E04CCF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef TOL As Double, _
    ByRef IW As Integer, _
    ByRef W1 As Double, _
    ByRef W2 As Double, _
    ByRef W3 As Double, _
    ByRef W4 As Double, _
    ByRef W5 As Double, _
    ByRef W6 As Double, _
    ByVal FUNCT As E04CCF_FUNCT_DELEGATE, _
    ByVal MONIT As E04CCF_MONIT_DELEGATE, _
    ByRef MAXCAL As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04DGA_OBJFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef OBJF As Double, _
    ByVal OBJGRD_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04DGA Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByVal OBJFUN As E04DGF_OBJFUN_DELEGATE, _
    ByRef ITER As Integer, _
    ByRef OBJF As Double, _
    ByRef OBJGRD As Double, _
    ByRef X As Double, _
    ByRef IWORK As Integer, _
    ByRef WORK As Double, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef IFAIL As Integer _
   )

  Delegate Sub E04DGF_OBJFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef OBJF As Double, _
    ByVal OBJGRD_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04DGF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByVal OBJFUN As E04DGF_OBJFUN_DELEGATE, _
    ByRef ITER As Integer, _
    ByRef OBJF As Double, _
    ByRef OBJGRD As Double, _
    ByRef X As Double, _
    ByRef IWORK As Integer, _
    ByRef WORK As Double, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04DJA Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04DJF Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef INFORM As Integer _
   )


   Declare Sub E04DKA Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04DKF Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer _
   )


  Delegate Sub E04FCF_LSQFUN_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

  Delegate Sub E04FCF_LSQMON_DELEGATE( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByVal S_rptr As IntPtr, _
    ByRef IGRADE As Integer, _
    ByRef NITER As Integer, _
    ByRef NF As Integer, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

   Declare Sub E04FDZ Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByVal S_rptr As IntPtr, _
    ByRef IGRADE As Integer, _
    ByRef NITER As Integer, _
    ByRef NF As Integer, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

   Declare Sub E04FCF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, ByRef N As Integer, ByVal LSQFUN As E04FCF_LSQFUN_DELEGATE, _
    ByVal LSQMON As E04FCF_LSQMON_DELEGATE, ByRef IPRINT As Integer, ByRef MAXCAL As Integer, _
    ByRef ETA As Double, ByRef XTOL As Double, ByRef STEPMX As Double, _
    ByRef X As Double, ByRef FSUMSQ As Double, ByRef FVEC As Double, _
    ByRef FJAC As Double, ByRef LDFJAC As Integer, ByRef S As Double, _
    ByRef V As Double, ByRef LDV As Integer, ByRef NITER As Integer, _
    ByRef NF As Integer, ByRef IW As Integer, ByRef LIW As Integer, _
    ByRef W As Double, ByRef LW As Integer, ByRef IFAIL As Integer _
   )


  Delegate Sub E04FYF_LSFUN1_DELEGATE( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04FYF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal LSFUN1 As E04FYF_LSFUN1_DELEGATE, _
    ByRef X As Double, _
    ByRef FSUMSQ As Double, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04GBF_LSQLIN_DELEGATE( _
    ByRef LSQLIN_SELECT As Integer _
  )

   Declare Sub E04FCV Lib "FLDLL224M_nag.dll" ( _
    ByRef LSQLIN_SELECT As Integer _
  )

   Declare Sub E04HEV Lib "FLDLL224M_nag.dll" ( _
    ByRef LSQLIN_SELECT As Integer _
  )

  Delegate Sub E04GBF_LSQFUN_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

  Delegate Sub E04GBF_LSQMON_DELEGATE( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByVal S_rptr As IntPtr, _
    ByRef IGRADE As Integer, _
    ByRef NITER As Integer, _
    ByRef NF As Integer, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

   Declare Sub E04GBF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, ByRef N As Integer, ByVal LSQLIN As E04GBF_LSQLIN_DELEGATE, _
    ByVal LSQFUN As E04GBF_LSQFUN_DELEGATE, ByVal LSQMON As E04GBF_LSQMON_DELEGATE, ByRef IPRINT As Integer, _
    ByRef MAXCAL As Integer, ByRef ETA As Double, ByRef XTOL As Double, _
    ByRef STEPMX As Double, ByRef X As Double, ByRef FSUMSQ As Double, _
    ByRef FVEC As Double, ByRef FJAC As Double, ByRef LDFJAC As Integer, _
    ByRef S As Double, ByRef V As Double, ByRef LDV As Integer, _
    ByRef NITER As Integer, ByRef NF As Integer, ByRef IW As Integer, _
    ByRef LIW As Integer, ByRef W As Double, ByRef LW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04GDF_LSQFUN_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

  Delegate Sub E04GDF_LSQMON_DELEGATE( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByVal S_rptr As IntPtr, _
    ByRef IGRADE As Integer, _
    ByRef NITER As Integer, _
    ByRef NF As Integer, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )


   Declare Sub E04GDF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, ByRef N As Integer, ByVal LSQFUN As E04GDF_LSQFUN_DELEGATE, _
    ByVal LSQMON As E04GDF_LSQMON_DELEGATE, ByRef IPRINT As Integer, ByRef MAXCAL As Integer, _
    ByRef ETA As Double, ByRef XTOL As Double, ByRef STEPMX As Double, _
    ByRef X As Double, ByRef FSUMSQ As Double, ByRef FVEC As Double, _
    ByRef FJAC As Double, ByRef LDFJAC As Integer, ByRef S As Double, _
    ByRef V As Double, ByRef LDV As Integer, ByRef NITER As Integer, _
    ByRef NF As Integer, ByRef IW As Integer, ByRef LIW As Integer, _
    ByRef W As Double, ByRef LW As Integer, ByRef IFAIL As Integer _
   )


  Delegate Sub E04GYF_LSFUN2_DELEGATE( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04GYF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal LSFUN2 As E04GYF_LSFUN2_DELEGATE, _
    ByRef X As Double, _
    ByRef FSUMSQ As Double, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04GZF_LSFUN2_DELEGATE( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04GZF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal LSFUN2 As E04GZF_LSFUN2_DELEGATE, _
    ByRef X As Double, _
    ByRef FSUMSQ As Double, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04HCF_FUNCT_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByRef FC As Double, _
    ByVal GC_rptr As IntPtr, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

   Declare Sub E04HCF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByVal FUNCT As E04HCF_FUNCT_DELEGATE, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef G As Double, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04HDF_FUNCT_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByRef FC As Double, _
    ByVal GC_rptr As IntPtr, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

  Delegate Sub E04HDF_H_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FHESL_rptr As IntPtr, _
    ByRef LH As Integer, _
    ByVal FHESD_rptr As IntPtr, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

   Declare Sub E04HDF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByVal FUNCT As E04HDF_FUNCT_DELEGATE, _
    ByVal H As E04HDF_H_DELEGATE, _
    ByRef X As Double, _
    ByRef G As Double, _
    ByRef HESL As Double, _
    ByRef LH As Integer, _
    ByRef HESD As Double, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04HEF_LSQFUN_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

  Delegate Sub E04HEF_LSQHES_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal XC_rptr As IntPtr, _
    ByVal B_rptr As IntPtr, _
    ByRef LB As Integer, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

  Delegate Sub E04HEF_LSQMON_DELEGATE( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByVal S_rptr As IntPtr, _
    ByRef IGRADE As Integer, _
    ByRef NITER As Integer, _
    ByRef NF As Integer, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )


   Declare Sub E04HEF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, ByRef N As Integer, ByVal LSQFUN As E04HEF_LSQFUN_DELEGATE, _
    ByVal LSQHES As E04HEF_LSQHES_DELEGATE, ByVal LSQMON As E04HEF_LSQMON_DELEGATE, ByRef IPRINT As Integer, _
    ByRef MAXCAL As Integer, ByRef ETA As Double, ByRef XTOL As Double, _
    ByRef STEPMX As Double, ByRef X As Double, ByRef FSUMSQ As Double, _
    ByRef FVEC As Double, ByRef FJAC As Double, ByRef LDFJAC As Integer, _
    ByRef S As Double, ByRef V As Double, ByRef LDV As Integer, _
    ByRef NITER As Integer, ByRef NF As Integer, ByRef IW As Integer, _
    ByRef LIW As Integer, ByRef W As Double, ByRef LW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04HYF_LSFUN2_DELEGATE( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub E04HYF_LSHES2_DELEGATE( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal XC_rptr As IntPtr, _
    ByVal B_rptr As IntPtr, _
    ByRef LB As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04HYF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal LSFUN2 As E04HYF_LSFUN2_DELEGATE, _
    ByVal LSHES2 As E04HYF_LSHES2_DELEGATE, _
    ByRef X As Double, _
    ByRef FSUMSQ As Double, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04JYF_FUNCT1_DELEGATE( _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByRef FC As Double, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04JYF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef IBOUND As Integer, _
    ByVal FUNCT1 As E04JYF_FUNCT1_DELEGATE, _
    ByRef BL As Double, _
    ByRef BU As Double, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04KDF_FUNCT_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByRef FC As Double, _
    ByVal GC_rptr As IntPtr, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

  Delegate Sub E04KDF_MONIT_DELEGATE( _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByRef FC As Double, _
    ByVal GC_rptr As IntPtr, _
    ByVal ISTATE_iptr As IntPtr, _
    ByRef GPJNRM As Double, _
    ByRef COND As Double, _
    ByRef POSDEF As Integer, _
    ByRef NITER As Integer, _
    ByRef NF As Integer, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

   Declare Sub E04KDF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, ByVal FUNCT As E04KDF_FUNCT_DELEGATE, ByVal MONIT As E04KDF_MONIT_DELEGATE, _
    ByRef IPRINT As Integer, ByRef MAXCAL As Integer, ByRef ETA As Double, _
    ByRef XTOL As Double, ByRef DELTA As Double, ByRef STEPMX As Double, _
    ByRef IBOUND As Integer, ByRef BL As Double, ByRef BU As Double, _
    ByRef X As Double, ByRef HESL As Double, ByRef LH As Integer, _
    ByRef HESD As Double, ByRef ISTATE As Integer, ByRef F As Double, _
    ByRef G As Double, ByRef IW As Integer, ByRef LIW As Integer, _
    ByRef W As Double, ByRef LW As Integer, ByRef IFAIL As Integer _
   )


  Delegate Sub E04KYF_FUNCT2_DELEGATE( _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByRef FC As Double, _
    ByVal GC_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04KYF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef IBOUND As Integer, _
    ByVal FUNCT2 As E04KYF_FUNCT2_DELEGATE, _
    ByRef BL As Double, _
    ByRef BU As Double, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef G As Double, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04KZF_FUNCT2_DELEGATE( _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByRef FC As Double, _
    ByVal GC_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04KZF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef IBOUND As Integer, _
    ByVal FUNCT2 As E04KZF_FUNCT2_DELEGATE, _
    ByRef BL As Double, _
    ByRef BU As Double, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef G As Double, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04LBF_FUNCT_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByRef FC As Double, _
    ByVal GC_rptr As IntPtr, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

  Delegate Sub E04LBF_H_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FHESL_rptr As IntPtr, _
    ByRef LH As Integer, _
    ByVal FHESD_rptr As IntPtr, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

  Delegate Sub E04LBF_MONIT_DELEGATE( _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByRef FC As Double, _
    ByVal GC_rptr As IntPtr, _
    ByVal ISTATE_iptr As IntPtr, _
    ByRef GPJNRM As Double, _
    ByRef COND As Double, _
    ByRef POSDEF As Integer, _
    ByRef NITER As Integer, _
    ByRef NF As Integer, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

   Declare Sub E04LBF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, ByVal FUNCT As E04LBF_FUNCT_DELEGATE, ByVal H As E04LBF_H_DELEGATE, _
    ByVal MONIT As E04LBF_MONIT_DELEGATE, ByRef IPRINT As Integer, ByRef MAXCAL As Integer, _
    ByRef ETA As Double, ByRef XTOL As Double, ByRef STEPMX As Double, _
    ByRef IBOUND As Integer, ByRef BL As Double, ByRef BU As Double, _
    ByRef X As Double, ByRef HESL As Double, ByRef LH As Integer, _
    ByRef HESD As Double, ByRef ISTATE As Integer, ByRef F As Double, _
    ByRef G As Double, ByRef IW As Integer, ByRef LIW As Integer, _
    ByRef W As Double, ByRef LW As Integer, ByRef IFAIL As Integer _
   )


  Delegate Sub E04LYF_FUNCT2_DELEGATE( _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByRef FC As Double, _
    ByVal GC_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub E04LYF_HESS2_DELEGATE( _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal HESLC_rptr As IntPtr, _
    ByRef LH As Integer, _
    ByVal HESDC_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04LYF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef IBOUND As Integer, _
    ByVal FUNCT2 As E04LYF_FUNCT2_DELEGATE, _
    ByVal HESS2 As E04LYF_HESS2_DELEGATE, _
    ByRef BL As Double, _
    ByRef BU As Double, _
    ByRef X As Double, _
    ByRef F As Double, _
    ByRef G As Double, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04MFA Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, ByRef NCLIN As Integer, ByRef A As Double, _
    ByRef LDA As Integer, ByRef BL As Double, ByRef BU As Double, _
    ByRef CVEC As Double, ByRef ISTATE As Integer, ByRef X As Double, _
    ByRef ITER As Integer, ByRef OBJ As Double, ByRef AX As Double, _
    ByRef CLAMDA As Double, ByRef IWORK As Integer, ByRef LIWORK As Integer, _
    ByRef WORK As Double, ByRef LWORK As Integer, ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, ByRef RWSAV As Double, ByRef IFAIL As Integer _
   )

   Declare Sub E04MFF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NCLIN As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef BL As Double, _
    ByRef BU As Double, _
    ByRef CVEC As Double, _
    ByRef ISTATE As Integer, _
    ByRef X As Double, _
    ByRef ITER As Integer, _
    ByRef OBJ As Double, _
    ByRef AX As Double, _
    ByRef CLAMDA As Double, _
    ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04MGA Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04MGF Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef INFORM As Integer _
   )


   Declare Sub E04MHA Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04MHF Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer _
   )


   Declare Sub E04MZF Lib "FLDLL224M_nag.dll" ( _
    ByRef INFILE As Integer, ByRef MAXN As Integer, ByRef MAXM As Integer, _
    ByRef MAXNNZ As Integer, ByRef XBLDEF As Double, ByRef XBUDEF As Double, _
    ByRef MPSLST As Integer, ByRef N As Integer, ByRef M As Integer, _
    ByRef NNZ As Integer, ByRef IOBJ As Integer, ByRef NCOLH As Integer, _
    ByRef A As Double, ByRef HA As Integer, ByRef KA As Integer, _
    ByRef BL As Double, ByRef BU As Double, ByVal START As string, ByVal STARTLength As Integer, _
    ByVal NAMES As string, ByVal NAMESLength As Integer, ByRef NNAME As Integer, ByVal CRNAME As string, ByVal CRNAMELength As Integer, _
    ByRef XS As Double, ByRef ISTATE As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub E04NCA Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, ByRef N As Integer, ByRef NCLIN As Integer, _
    ByRef LDC As Integer, ByRef LDA As Integer, ByRef C As Double, _
    ByRef BL As Double, ByRef BU As Double, ByRef CVEC As Double, _
    ByRef ISTATE As Integer, ByRef KX As Integer, ByRef X As Double, _
    ByRef A As Double, ByRef B As Double, ByRef ITER As Integer, _
    ByRef OBJ As Double, ByRef CLAMDA As Double, ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, ByRef WORK As Double, ByRef LWORK As Integer, _
    ByRef LWSAV As Integer, ByRef IWSAV As Integer, ByRef RWSAV As Double, _
    ByRef IFAIL As Integer _
   )

   Declare Sub E04NCF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, ByRef N As Integer, ByRef NCLIN As Integer, _
    ByRef LDC As Integer, ByRef LDA As Integer, ByRef C As Double, _
    ByRef BL As Double, ByRef BU As Double, ByRef CVEC As Double, _
    ByRef ISTATE As Integer, ByRef KX As Integer, ByRef X As Double, _
    ByRef A As Double, ByRef B As Double, ByRef ITER As Integer, _
    ByRef OBJ As Double, ByRef CLAMDA As Double, ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, ByRef WORK As Double, ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04NDA Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04NDF Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef INFORM As Integer _
   )


   Declare Sub E04NEA Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04NEF Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer _
   )


  Delegate Sub E04NFA_QPHESS_DELEGATE( _
    ByRef N As Integer, _
    ByRef JTHCOL As Integer, _
    ByVal H_rptr As IntPtr, _
    ByRef LDH As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal HX_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr, _
    ByVal IWSAV_iptr As IntPtr _
  )

   Declare Sub E54NFU Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef JTHCOL As Integer, _
    ByVal H_rptr As IntPtr, _
    ByRef LDH As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal HX_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr, _
    ByVal IWSAV_iptr As IntPtr _
  )

   Declare Sub E04NFA Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, ByRef NCLIN As Integer, ByRef A As Double, _
    ByRef LDA As Integer, ByRef BL As Double, ByRef BU As Double, _
    ByRef CVEC As Double, ByRef H As Double, ByRef LDH As Integer, _
    ByVal QPHESS As E04NFF_QPHESS_DELEGATE, ByRef ISTATE As Integer, ByRef X As Double, _
    ByRef ITER As Integer, ByRef OBJ As Double, ByRef AX As Double, _
    ByRef CLAMDA As Double, ByRef IWORK As Integer, ByRef LIWORK As Integer, _
    ByRef WORK As Double, ByRef LWORK As Integer, ByRef IUSER As Integer, _
    ByRef RUSER As Double, ByRef LWSAV As Integer, ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, ByRef IFAIL As Integer _
   )

  Delegate Sub E04NFF_QPHESS_DELEGATE( _
    ByRef N As Integer, _
    ByRef JTHCOL As Integer, _
    ByVal H_rptr As IntPtr, _
    ByRef LDH As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal HX_rptr As IntPtr _
  )

   Declare Sub E04NFU Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef JTHCOL As Integer, _
    ByVal H_rptr As IntPtr, _
    ByRef LDH As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal HX_rptr As IntPtr _
  )

   Declare Sub E04NFF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, ByRef NCLIN As Integer, ByRef A As Double, _
    ByRef LDA As Integer, ByRef BL As Double, ByRef BU As Double, _
    ByRef CVEC As Double, ByRef H As Double, ByRef LDH As Integer, _
    ByVal QPHESS As E04NFF_QPHESS_DELEGATE, ByRef ISTATE As Integer, ByRef X As Double, _
    ByRef ITER As Integer, ByRef OBJ As Double, ByRef AX As Double, _
    ByRef CLAMDA As Double, ByRef IWORK As Integer, ByRef LIWORK As Integer, _
    ByRef WORK As Double, ByRef LWORK As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub E04NGA Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04NGF Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef INFORM As Integer _
   )


   Declare Sub E04NHA Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04NHF Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer _
   )


  Delegate Sub E04NKA_QPHX_DELEGATE( _
    ByRef NSTATE As Integer, _
    ByRef NCOLH As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal HX_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E54NKU Lib "FLDLL224M_nag.dll" ( _
    ByRef NSTATE As Integer, _
    ByRef NCOLH As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal HX_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04NKA Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, ByRef M As Integer, ByRef NNZ As Integer, _
    ByRef IOBJ As Integer, ByRef NCOLH As Integer, ByVal QPHX As E04NKF_QPHX_DELEGATE, _
    ByRef A As Double, ByRef HA As Integer, ByRef KA As Integer, _
    ByRef BL As Double, ByRef BU As Double, ByVal START As string, ByVal STARTLength As Integer, _
    ByVal NAMES As string, ByVal NAMESLength As Integer, ByRef NNAME As Integer, ByVal CRNAME As string, ByVal CRNAMELength As Integer, _
    ByRef NS As Integer, ByRef XS As Double, ByRef ISTATE As Integer, _
    ByRef MINIZ As Integer, ByRef MINZ As Integer, ByRef NINF As Integer, _
    ByRef SINF As Double, ByRef OBJ As Double, ByRef CLAMDA As Double, _
    ByRef IZ As Integer, ByRef LENIZ As Integer, ByRef Z As Double, _
    ByRef LENZ As Integer, ByRef IUSER As Integer, ByRef RUSER As Double, _
    ByRef LWSAV As Integer, ByRef IWSAV As Integer, ByRef RWSAV As Double, _
    ByRef IFAIL As Integer _
   )

  Delegate Sub E04NKF_QPHX_DELEGATE( _
    ByRef NSTATE As Integer, _
    ByRef NCOLH As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal HX_rptr As IntPtr _
  )

   Declare Sub E04NKU Lib "FLDLL224M_nag.dll" ( _
    ByRef NSTATE As Integer, _
    ByRef NCOLH As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal HX_rptr As IntPtr _
  )

   Declare Sub E04NKF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, ByRef M As Integer, ByRef NNZ As Integer, _
    ByRef IOBJ As Integer, ByRef NCOLH As Integer, ByVal QPHX As E04NKF_QPHX_DELEGATE, _
    ByRef A As Double, ByRef HA As Integer, ByRef KA As Integer, _
    ByRef BL As Double, ByRef BU As Double, ByVal START As string, ByVal STARTLength As Integer, _
    ByVal NAMES As string, ByVal NAMESLength As Integer, ByRef NNAME As Integer, ByVal CRNAME As string, ByVal CRNAMELength As Integer, _
    ByRef NS As Integer, ByRef XS As Double, ByRef ISTATE As Integer, _
    ByRef MINIZ As Integer, ByRef MINZ As Integer, ByRef NINF As Integer, _
    ByRef SINF As Double, ByRef OBJ As Double, ByRef CLAMDA As Double, _
    ByRef IZ As Integer, ByRef LENIZ As Integer, ByRef Z As Double, _
    ByRef LENZ As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub E04NLA Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04NLF Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef INFORM As Integer _
   )


   Declare Sub E04NMA Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04NMF Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer _
   )


   Declare Sub E04NPF Lib "FLDLL224M_nag.dll" ( _
    ByVal CW As string, ByVal CWLength As Integer, _
    ByRef LENCW As Integer, _
    ByRef IW As Integer, _
    ByRef LENIW As Integer, _
    ByRef RW As Double, _
    ByRef LENRW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04NQF_QPHX_DELEGATE( _
    ByRef NCOLH As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal HX_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal CUSER_chptr As IntPtr, ByVal CUSER_chptrLength As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04NSH Lib "FLDLL224M_nag.dll" ( _
    ByRef NCOLH As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal HX_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal CUSER_chptr As IntPtr, ByVal CUSER_chptrLength As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04NQF Lib "FLDLL224M_nag.dll" ( _
    ByVal START As string, ByVal STARTLength As Integer, ByVal QPHX As E04NQF_QPHX_DELEGATE, ByRef M As Integer, _
    ByRef N As Integer, ByRef NE As Integer, ByRef NNAME As Integer, _
    ByRef LENC As Integer, ByRef NCOLH As Integer, ByRef IOBJ As Integer, _
    ByRef OBJADD As Double, ByVal PROB As string, ByVal PROBLength As Integer, ByRef ACOL As Double, _
    ByRef INDA As Integer, ByRef LOCA As Integer, ByRef BL As Double, _
    ByRef BU As Double, ByRef C As Double, ByVal NAMES As string, ByVal NAMESLength As Integer, _
    ByRef HELAST As Integer, ByRef HS As Integer, ByRef X As Double, _
    ByRef PI As Double, ByRef RC As Double, ByRef NS As Integer, _
    ByRef NINF As Integer, ByRef SINF As Double, ByRef OBJ As Double, _
    ByVal CW As string, ByVal CWLength As Integer, ByRef LENCW As Integer, ByRef IW As Integer, _
    ByRef LENIW As Integer, ByRef RW As Double, ByRef LENRW As Integer, _
    ByVal CUSER As string, ByVal CUSERLength As Integer, ByRef IUSER As Integer, ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04NRF Lib "FLDLL224M_nag.dll" ( _
    ByRef ISPECS As Integer, _
    ByVal CW As string, ByVal CWLength As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04NSF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByVal CW As string, ByVal CWLength As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04NTF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByRef IVALUE As Integer, _
    ByVal CW As string, ByVal CWLength As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04NUF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByRef RVALUE As Double, _
    ByVal CW As string, ByVal CWLength As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04NXF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByRef IVALUE As Integer, _
    ByVal CW As string, ByVal CWLength As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04NYF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByRef RVALUE As Double, _
    ByVal CW As string, ByVal CWLength As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04UCA_CONFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef N As Integer, _
    ByRef LDCJ As Integer, _
    ByVal NEEDC_iptr As IntPtr, _
    ByVal X_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal CJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E54UDM Lib "FLDLL224M_nag.dll" ( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef N As Integer, _
    ByRef LDCJ As Integer, _
    ByVal NEEDC_iptr As IntPtr, _
    ByVal X_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal CJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub E04UCA_OBJFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef OBJF As Double, _
    ByVal OBJGRD_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04UCA Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, ByRef NCLIN As Integer, ByRef NCNLN As Integer, _
    ByRef LDA As Integer, ByRef LDCJ As Integer, ByRef LDR As Integer, _
    ByRef A As Double, ByRef BL As Double, ByRef BU As Double, _
    ByVal CONFUN As E04UCF_CONFUN_DELEGATE, ByVal OBJFUN As E04UCF_OBJFUN_DELEGATE, ByRef ITER As Integer, _
    ByRef ISTATE As Integer, ByRef C As Double, ByRef CJAC As Double, _
    ByRef CLAMDA As Double, ByRef OBJF As Double, ByRef OBJGRD As Double, _
    ByRef R As Double, ByRef X As Double, ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, ByRef WORK As Double, ByRef LWORK As Integer, _
    ByRef IUSER As Integer, ByRef RUSER As Double, ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, ByRef RWSAV As Double, ByRef IFAIL As Integer _
   )

  Delegate Sub E04UCF_CONFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef N As Integer, _
    ByRef LDCJ As Integer, _
    ByVal NEEDC_iptr As IntPtr, _
    ByVal X_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal CJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04UDM Lib "FLDLL224M_nag.dll" ( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef N As Integer, _
    ByRef LDCJ As Integer, _
    ByVal NEEDC_iptr As IntPtr, _
    ByVal X_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal CJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub E04UCF_OBJFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef OBJF As Double, _
    ByVal OBJGRD_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04UCF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, ByRef NCLIN As Integer, ByRef NCNLN As Integer, _
    ByRef LDA As Integer, ByRef LDCJ As Integer, ByRef LDR As Integer, _
    ByRef A As Double, ByRef BL As Double, ByRef BU As Double, _
    ByVal CONFUN As E04UCF_CONFUN_DELEGATE, ByVal OBJFUN As E04UCF_OBJFUN_DELEGATE, ByRef ITER As Integer, _
    ByRef ISTATE As Integer, ByRef C As Double, ByRef CJAC As Double, _
    ByRef CLAMDA As Double, ByRef OBJF As Double, ByRef OBJGRD As Double, _
    ByRef R As Double, ByRef X As Double, ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, ByRef WORK As Double, ByRef LWORK As Integer, _
    ByRef IUSER As Integer, ByRef RUSER As Double, ByRef IFAIL As Integer _
   )


   Declare Sub E04UDA Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04UDF Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef INFORM As Integer _
   )


   Declare Sub E04UEA Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04UEF Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer _
   )


   Declare Sub E04UFA Lib "FLDLL224M_nag.dll" ( _
    ByRef IREVCM As Integer, ByRef N As Integer, ByRef NCLIN As Integer, _
    ByRef NCNLN As Integer, ByRef LDA As Integer, ByRef LDCJ As Integer, _
    ByRef LDR As Integer, ByRef A As Double, ByRef BL As Double, _
    ByRef BU As Double, ByRef ITER As Integer, ByRef ISTATE As Integer, _
    ByRef C As Double, ByRef CJAC As Double, ByRef CLAMDA As Double, _
    ByRef OBJF As Double, ByRef OBJGRD As Double, ByRef R As Double, _
    ByRef X As Double, ByRef NEEDC As Integer, ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, ByRef WORK As Double, ByRef LWORK As Integer, _
    ByVal CWSAV As string, ByVal CWSAVLength As Integer, ByRef LWSAV As Integer, ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, ByRef IFAIL As Integer _
   )

   Declare Sub E04UFF Lib "FLDLL224M_nag.dll" ( _
    ByRef IREVCM As Integer, ByRef N As Integer, ByRef NCLIN As Integer, _
    ByRef NCNLN As Integer, ByRef LDA As Integer, ByRef LDCJ As Integer, _
    ByRef LDR As Integer, ByRef A As Double, ByRef BL As Double, _
    ByRef BU As Double, ByRef ITER As Integer, ByRef ISTATE As Integer, _
    ByRef C As Double, ByRef CJAC As Double, ByRef CLAMDA As Double, _
    ByRef OBJF As Double, ByRef OBJGRD As Double, ByRef R As Double, _
    ByRef X As Double, ByRef NEEDC As Integer, ByRef IWORK As Integer, _
    ByRef LIWORK As Integer, ByRef WORK As Double, ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04UGA_CONFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef NJNLN As Integer, _
    ByRef NNZJAC As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E54UGM Lib "FLDLL224M_nag.dll" ( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef NJNLN As Integer, _
    ByRef NNZJAC As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub E04UGA_OBJFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef NONLN As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef OBJF As Double, _
    ByVal OBJGRD_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E54UGN Lib "FLDLL224M_nag.dll" ( _
    ByRef MODE As Integer, _
    ByRef NONLN As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef OBJF As Double, _
    ByVal OBJGRD_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04UGA Lib "FLDLL224M_nag.dll" ( _
    ByVal CONFUN As E04UGF_CONFUN_DELEGATE, ByVal OBJFUN As E04UGF_OBJFUN_DELEGATE, ByRef N As Integer, _
    ByRef M As Integer, ByRef NCNLN As Integer, ByRef NONLN As Integer, _
    ByRef NJNLN As Integer, ByRef IOBJ As Integer, ByRef NNZ As Integer, _
    ByRef A As Double, ByRef HA As Integer, ByRef KA As Integer, _
    ByRef BL As Double, ByRef BU As Double, ByVal START As string, ByVal STARTLength As Integer, _
    ByRef NNAME As Integer, ByVal NAMES As string, ByVal NAMESLength As Integer, ByRef NS As Integer, _
    ByRef XS As Double, ByRef ISTATE As Integer, ByRef CLAMDA As Double, _
    ByRef MINIZ As Integer, ByRef MINZ As Integer, ByRef NINF As Integer, _
    ByRef SINF As Double, ByRef OBJ As Double, ByRef IZ As Integer, _
    ByRef LENIZ As Integer, ByRef Z As Double, ByRef LENZ As Integer, _
    ByRef IUSER As Integer, ByRef RUSER As Double, ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, ByRef RWSAV As Double, ByRef IFAIL As Integer _
   )

  Delegate Sub E04UGF_CONFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef NJNLN As Integer, _
    ByRef NNZJAC As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04UGM Lib "FLDLL224M_nag.dll" ( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef NJNLN As Integer, _
    ByRef NNZJAC As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub E04UGF_OBJFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef NONLN As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef OBJF As Double, _
    ByVal OBJGRD_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04UGN Lib "FLDLL224M_nag.dll" ( _
    ByRef MODE As Integer, _
    ByRef NONLN As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef OBJF As Double, _
    ByVal OBJGRD_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04UGF Lib "FLDLL224M_nag.dll" ( _
    ByVal CONFUN As E04UGF_CONFUN_DELEGATE, ByVal OBJFUN As E04UGF_OBJFUN_DELEGATE, ByRef N As Integer, _
    ByRef M As Integer, ByRef NCNLN As Integer, ByRef NONLN As Integer, _
    ByRef NJNLN As Integer, ByRef IOBJ As Integer, ByRef NNZ As Integer, _
    ByRef A As Double, ByRef HA As Integer, ByRef KA As Integer, _
    ByRef BL As Double, ByRef BU As Double, ByVal START As string, ByVal STARTLength As Integer, _
    ByRef NNAME As Integer, ByVal NAMES As string, ByVal NAMESLength As Integer, ByRef NS As Integer, _
    ByRef XS As Double, ByRef ISTATE As Integer, ByRef CLAMDA As Double, _
    ByRef MINIZ As Integer, ByRef MINZ As Integer, ByRef NINF As Integer, _
    ByRef SINF As Double, ByRef OBJ As Double, ByRef IZ As Integer, _
    ByRef LENIZ As Integer, ByRef Z As Double, ByRef LENZ As Integer, _
    ByRef IUSER As Integer, ByRef RUSER As Double, ByRef IFAIL As Integer _
   )


   Declare Sub E04UHA Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04UHF Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef INFORM As Integer _
   )


   Declare Sub E04UJA Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04UJF Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer _
   )


   Declare Sub E04UQA Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04UQF Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTNS As Integer, _
    ByRef INFORM As Integer _
   )


   Declare Sub E04URA Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer, _
    ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef INFORM As Integer _
   )

   Declare Sub E04URF Lib "FLDLL224M_nag.dll" ( _
    ByVal STR As string, ByVal STRLength As Integer _
   )


  Delegate Sub E04USA_CONFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef N As Integer, _
    ByRef LDCJ As Integer, _
    ByVal NEEDC_iptr As IntPtr, _
    ByVal X_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal CJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )


  Delegate Sub E04USA_OBJFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef LDFJ As Integer, _
    ByRef NEEDFI As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04USA Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, ByRef N As Integer, ByRef NCLIN As Integer, _
    ByRef NCNLN As Integer, ByRef LDA As Integer, ByRef LDCJ As Integer, _
    ByRef LDFJ As Integer, ByRef LDR As Integer, ByRef A As Double, _
    ByRef BL As Double, ByRef BU As Double, ByRef Y As Double, _
    ByVal CONFUN As E04USF_CONFUN_DELEGATE, ByVal OBJFUN As E04USF_OBJFUN_DELEGATE, ByRef ITER As Integer, _
    ByRef ISTATE As Integer, ByRef C As Double, ByRef CJAC As Double, _
    ByRef F As Double, ByRef FJAC As Double, ByRef CLAMDA As Double, _
    ByRef OBJF As Double, ByRef R As Double, ByRef X As Double, _
    ByRef IWORK As Integer, ByRef LIWORK As Integer, ByRef WORK As Double, _
    ByRef LWORK As Integer, ByRef IUSER As Integer, ByRef RUSER As Double, _
    ByRef LWSAV As Integer, ByRef IWSAV As Integer, ByRef RWSAV As Double, _
    ByRef IFAIL As Integer _
   )

  Delegate Sub E04USF_CONFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef N As Integer, _
    ByRef LDCJ As Integer, _
    ByVal NEEDC_iptr As IntPtr, _
    ByVal X_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal CJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )


  Delegate Sub E04USF_OBJFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef LDFJ As Integer, _
    ByRef NEEDFI As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal F_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04USF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, ByRef N As Integer, ByRef NCLIN As Integer, _
    ByRef NCNLN As Integer, ByRef LDA As Integer, ByRef LDCJ As Integer, _
    ByRef LDFJ As Integer, ByRef LDR As Integer, ByRef A As Double, _
    ByRef BL As Double, ByRef BU As Double, ByRef Y As Double, _
    ByVal CONFUN As E04USF_CONFUN_DELEGATE, ByVal OBJFUN As E04USF_OBJFUN_DELEGATE, ByRef ITER As Integer, _
    ByRef ISTATE As Integer, ByRef C As Double, ByRef CJAC As Double, _
    ByRef F As Double, ByRef FJAC As Double, ByRef CLAMDA As Double, _
    ByRef OBJF As Double, ByRef R As Double, ByRef X As Double, _
    ByRef IWORK As Integer, ByRef LIWORK As Integer, ByRef WORK As Double, _
    ByRef LWORK As Integer, ByRef IUSER As Integer, ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04VGF Lib "FLDLL224M_nag.dll" ( _
    ByVal CW As string, ByVal CWLength As Integer, _
    ByRef LENCW As Integer, _
    ByRef IW As Integer, _
    ByRef LENIW As Integer, _
    ByRef RW As Double, _
    ByRef LENRW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04VHF_USRFUN_DELEGATE( _
    ByRef STATUS As Integer, _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef NEEDF As Integer, _
    ByRef NF As Integer, _
    ByVal F_rptr As IntPtr, _
    ByRef NEEDG As Integer, _
    ByRef LENG As Integer, _
    ByVal G_rptr As IntPtr, _
    ByVal CUSER_chptr As IntPtr, ByVal CUSER_chptrLength As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04VHF Lib "FLDLL224M_nag.dll" ( _
    ByRef START As Integer, ByRef NF As Integer, ByRef N As Integer, _
    ByRef NXNAME As Integer, ByRef NFNAME As Integer, ByRef OBJADD As Double, _
    ByRef OBJROW As Integer, ByVal PROB As string, ByVal PROBLength As Integer, ByVal USRFUN As E04VHF_USRFUN_DELEGATE, _
    ByRef IAFUN As Integer, ByRef JAVAR As Integer, ByRef A As Double, _
    ByRef LENA As Integer, ByRef NEA As Integer, ByRef IGFUN As Integer, _
    ByRef JGVAR As Integer, ByRef LENG As Integer, ByRef NEG As Integer, _
    ByRef XLOW As Double, ByRef XUPP As Double, ByVal XNAMES As string, ByVal XNAMESLength As Integer, _
    ByRef FLOW As Double, ByRef FUPP As Double, ByVal FNAMES As string, ByVal FNAMESLength As Integer, _
    ByRef X As Double, ByRef XSTATE As Integer, ByRef XMUL As Double, _
    ByRef F As Double, ByRef FSTATE As Integer, ByRef FMUL As Double, _
    ByRef NS As Integer, ByRef NINF As Integer, ByRef SINF As Double, _
    ByVal CW As string, ByVal CWLength As Integer, ByRef LENCW As Integer, ByRef IW As Integer, _
    ByRef LENIW As Integer, ByRef RW As Double, ByRef LENRW As Integer, _
    ByVal CUSER As string, ByVal CUSERLength As Integer, ByRef IUSER As Integer, ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04VJF_USRFUN_DELEGATE( _
    ByRef STATUS As Integer, _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef NEEDF As Integer, _
    ByRef NF As Integer, _
    ByVal F_rptr As IntPtr, _
    ByRef NEEDG As Integer, _
    ByRef LENG As Integer, _
    ByVal G_rptr As IntPtr, _
    ByVal CUSER_chptr As IntPtr, ByVal CUSER_chptrLength As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04VJF Lib "FLDLL224M_nag.dll" ( _
    ByRef NF As Integer, ByRef N As Integer, ByVal USRFUN As E04VJF_USRFUN_DELEGATE, _
    ByRef IAFUN As Integer, ByRef JAVAR As Integer, ByRef A As Double, _
    ByRef LENA As Integer, ByRef NEA As Integer, ByRef IGFUN As Integer, _
    ByRef JGVAR As Integer, ByRef LENG As Integer, ByRef NEG As Integer, _
    ByRef X As Double, ByRef XLOW As Double, ByRef XUPP As Double, _
    ByVal CW As string, ByVal CWLength As Integer, ByRef LENCW As Integer, ByRef IW As Integer, _
    ByRef LENIW As Integer, ByRef RW As Double, ByRef LENRW As Integer, _
    ByVal CUSER As string, ByVal CUSERLength As Integer, ByRef IUSER As Integer, ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04VKF Lib "FLDLL224M_nag.dll" ( _
    ByRef ISPECS As Integer, _
    ByVal CW As string, ByVal CWLength As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04VLF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByVal CW As string, ByVal CWLength As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04VMF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByRef IVALUE As Integer, _
    ByVal CW As string, ByVal CWLength As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04VNF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByRef RVALUE As Double, _
    ByVal CW As string, ByVal CWLength As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04VRF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByRef IVALUE As Integer, _
    ByVal CW As string, ByVal CWLength As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04VSF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByRef RVALUE As Double, _
    ByVal CW As string, ByVal CWLength As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04WBF Lib "FLDLL224M_nag.dll" ( _
    ByVal RNAME As string, ByVal RNAMELength As Integer, _
    ByVal CWSAV As string, ByVal CWSAVLength As Integer, _
    ByRef LCWSAV As Integer, _
    ByRef LWSAV As Integer, _
    ByRef LLWSAV As Integer, _
    ByRef IWSAV As Integer, _
    ByRef LIWSAV As Integer, _
    ByRef RWSAV As Double, _
    ByRef LRWSAV As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04WCF Lib "FLDLL224M_nag.dll" ( _
    ByRef IW As Integer, _
    ByRef LENIW As Integer, _
    ByRef RW As Double, _
    ByRef LENRW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04WDF_CONFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef N As Integer, _
    ByRef LDCJ As Integer, _
    ByVal NEEDC_iptr As IntPtr, _
    ByVal X_rptr As IntPtr, _
    ByVal CCON_rptr As IntPtr, _
    ByVal CJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04WDP Lib "FLDLL224M_nag.dll" ( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef N As Integer, _
    ByRef LDCJ As Integer, _
    ByVal NEEDC_iptr As IntPtr, _
    ByVal X_rptr As IntPtr, _
    ByVal CCON_rptr As IntPtr, _
    ByVal CJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub E04WDF_OBJFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef OBJF As Double, _
    ByVal GRAD_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04WDF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, ByRef NCLIN As Integer, ByRef NCNLN As Integer, _
    ByRef LDA As Integer, ByRef LDCJ As Integer, ByRef LDH As Integer, _
    ByRef A As Double, ByRef BL As Double, ByRef BU As Double, _
    ByVal CONFUN As E04WDF_CONFUN_DELEGATE, ByVal OBJFUN As E04WDF_OBJFUN_DELEGATE, ByRef MAJITS As Integer, _
    ByRef ISTATE As Integer, ByRef CCON As Double, ByRef CJAC As Double, _
    ByRef CLAMDA As Double, ByRef OBJF As Double, ByRef GRAD As Double, _
    ByRef H As Double, ByRef X As Double, ByRef IW As Integer, _
    ByRef LENIW As Integer, ByRef RW As Double, ByRef LENRW As Integer, _
    ByRef IUSER As Integer, ByRef RUSER As Double, ByRef IFAIL As Integer _
   )


   Declare Sub E04WEF Lib "FLDLL224M_nag.dll" ( _
    ByRef ISPECS As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04WFF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04WGF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByRef IVALUE As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04WHF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByRef RVALUE As Double, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04WKF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByRef IVALUE As Integer, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04WLF Lib "FLDLL224M_nag.dll" ( _
    ByVal ST As string, ByVal STLength As Integer, _
    ByRef RVALUE As Double, _
    ByRef IW As Integer, _
    ByRef RW As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04XAA_OBJFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef OBJF As Double, _
    ByVal OBJGRD_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04XAA Lib "FLDLL224M_nag.dll" ( _
    ByRef MSGLVL As Integer, ByRef N As Integer, ByRef EPSRF As Double, _
    ByRef X As Double, ByRef MODE As Integer, ByVal OBJFUN As E04XAF_OBJFUN_DELEGATE, _
    ByRef LDH As Integer, ByRef HFORW As Double, ByRef OBJF As Double, _
    ByRef OBJGRD As Double, ByRef HCNTRL As Double, ByRef H As Double, _
    ByRef IWARN As Integer, ByRef WORK As Double, ByRef IUSER As Integer, _
    ByRef RUSER As Double, ByRef INFO As Integer, ByRef LWSAV As Integer, _
    ByRef IWSAV As Integer, ByRef RWSAV As Double, ByRef IFAIL As Integer _
   )

  Delegate Sub E04XAF_OBJFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef OBJF As Double, _
    ByVal OBJGRD_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04XAF Lib "FLDLL224M_nag.dll" ( _
    ByRef MSGLVL As Integer, _
    ByRef N As Integer, _
    ByRef EPSRF As Double, _
    ByRef X As Double, _
    ByRef MODE As Integer, _
    ByVal OBJFUN As E04XAF_OBJFUN_DELEGATE, _
    ByRef LDH As Integer, _
    ByRef HFORW As Double, _
    ByRef OBJF As Double, _
    ByRef OBJGRD As Double, _
    ByRef HCNTRL As Double, _
    ByRef H As Double, _
    ByRef IWARN As Integer, _
    ByRef WORK As Double, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef INFO As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04YAF_LSQFUN_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

   Declare Sub E04YAF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal LSQFUN As E04YAF_LSQFUN_DELEGATE, _
    ByRef X As Double, _
    ByRef FVEC As Double, _
    ByRef FJAC As Double, _
    ByRef LDFJAC As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04YBF_LSQFUN_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal XC_rptr As IntPtr, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal FJAC_rptr As IntPtr, _
    ByRef LDFJAC As Integer, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

  Delegate Sub E04YBF_LSQHES_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal FVEC_rptr As IntPtr, _
    ByVal XC_rptr As IntPtr, _
    ByVal B_rptr As IntPtr, _
    ByRef LB As Integer, _
    ByVal IW_iptr As IntPtr, _
    ByRef LIW As Integer, _
    ByVal W_rptr As IntPtr, _
    ByRef LW As Integer _
  )

   Declare Sub E04YBF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal LSQFUN As E04YBF_LSQFUN_DELEGATE, _
    ByVal LSQHES As E04YBF_LSQHES_DELEGATE, _
    ByRef X As Double, _
    ByRef FVEC As Double, _
    ByRef FJAC As Double, _
    ByRef LDFJAC As Integer, _
    ByRef B As Double, _
    ByRef LB As Integer, _
    ByRef IW As Integer, _
    ByRef LIW As Integer, _
    ByRef W As Double, _
    ByRef LW As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E04YCF Lib "FLDLL224M_nag.dll" ( _
    ByRef JOB As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef FSUMSQ As Double, _
    ByRef S As Double, _
    ByRef V As Double, _
    ByRef LDV As Integer, _
    ByRef CJ As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E04ZCA_CONFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef N As Integer, _
    ByRef LDCJAC As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal CJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E54VDM Lib "FLDLL224M_nag.dll" ( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef N As Integer, _
    ByRef LDCJAC As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal CJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

  Delegate Sub E04ZCA_OBJFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef OBJF As Double, _
    ByVal OBJGRD_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub E04ZCA Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NCNLN As Integer, _
    ByRef LDCJAC As Integer, _
    ByVal CONFUN As E04ZCF_CONFUN_DELEGATE, _
    ByVal OBJFUN As E04ZCF_OBJFUN_DELEGATE, _
    ByRef C As Double, _
    ByRef CJAC As Double, _
    ByRef OBJF As Double, _
    ByRef OBJGRD As Double, _
    ByRef X As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )

  Delegate Sub E04ZCF_CONFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef N As Integer, _
    ByRef LDCJAC As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal CJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer _
  )

   Declare Sub E04VDM Lib "FLDLL224M_nag.dll" ( _
    ByRef MODE As Integer, _
    ByRef NCNLN As Integer, _
    ByRef N As Integer, _
    ByRef LDCJAC As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal C_rptr As IntPtr, _
    ByVal CJAC_rptr As IntPtr, _
    ByRef NSTATE As Integer _
  )

  Delegate Sub E04ZCF_OBJFUN_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef OBJF As Double, _
    ByVal OBJGRD_rptr As IntPtr, _
    ByRef NSTATE As Integer _
  )

   Declare Sub E04ZCF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NCNLN As Integer, _
    ByRef LDCJAC As Integer, _
    ByVal CONFUN As E04ZCF_CONFUN_DELEGATE, _
    ByVal OBJFUN As E04ZCF_OBJFUN_DELEGATE, _
    ByRef C As Double, _
    ByRef CJAC As Double, _
    ByRef OBJF As Double, _
    ByRef OBJGRD As Double, _
    ByRef X As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E05JAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef COMM As Double, _
    ByRef LCOMM As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub E05JBF_OBJFUN_DELEGATE( _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByRef F As Double, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr, _
    ByRef INFORM As Integer _
  )

  Delegate Sub E05JBF_MONIT_DELEGATE( _
    ByRef N As Integer, _
    ByRef NCALL As Integer, _
    ByVal XBEST_rptr As IntPtr, _
    ByVal ICOUNT_iptr As IntPtr, _
    ByRef NINIT As Integer, _
    ByVal LIST_rptr As IntPtr, _
    ByVal NUMPTS_iptr As IntPtr, _
    ByVal INITPT_iptr As IntPtr, _
    ByRef NBASKT As Integer, _
    ByVal XBASKT_rptr As IntPtr, _
    ByVal BOXL_rptr As IntPtr, _
    ByVal BOXU_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr, _
    ByRef INFORM As Integer _
  )

   Declare Sub E05JBK Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NCALL As Integer, _
    ByVal XBEST_rptr As IntPtr, _
    ByVal ICOUNT_iptr As IntPtr, _
    ByRef NINIT As Integer, _
    ByVal LIST_rptr As IntPtr, _
    ByVal NUMPTS_iptr As IntPtr, _
    ByVal INITPT_iptr As IntPtr, _
    ByRef NBASKT As Integer, _
    ByVal XBASKT_rptr As IntPtr, _
    ByVal BOXL_rptr As IntPtr, _
    ByVal BOXU_rptr As IntPtr, _
    ByRef NSTATE As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr, _
    ByRef INFORM As Integer _
  )

   Declare Sub E05JBF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByVal OBJFUN As E05JBF_OBJFUN_DELEGATE, _
    ByRef IBOUND As Integer, _
    ByRef IINIT As Integer, _
    ByRef BL As Double, _
    ByRef BU As Double, _
    ByRef SDLIST As Integer, _
    ByRef LIST As Double, _
    ByRef NUMPTS As Integer, _
    ByRef INITPT As Integer, _
    ByVal MONIT As E05JBF_MONIT_DELEGATE, _
    ByRef X As Double, _
    ByRef OBJ As Double, _
    ByRef COMM As Double, _
    ByRef LCOMM As Integer, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E05JCF Lib "FLDLL224M_nag.dll" ( _
    ByRef IOPTS As Integer, _
    ByRef COMM As Double, _
    ByRef LCOMM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E05JDF Lib "FLDLL224M_nag.dll" ( _
    ByVal OPTSTR As string, ByVal OPTSTRLength As Integer, _
    ByRef COMM As Double, _
    ByRef LCOMM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E05JEF Lib "FLDLL224M_nag.dll" ( _
    ByVal OPTSTR As string, ByVal OPTSTRLength As Integer, _
    ByVal CVALUE As string, ByVal CVALUELength As Integer, _
    ByRef COMM As Double, _
    ByRef LCOMM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E05JFF Lib "FLDLL224M_nag.dll" ( _
    ByVal OPTSTR As string, ByVal OPTSTRLength As Integer, _
    ByRef IVALUE As Integer, _
    ByRef COMM As Double, _
    ByRef LCOMM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E05JGF Lib "FLDLL224M_nag.dll" ( _
    ByVal OPTSTR As string, ByVal OPTSTRLength As Integer, _
    ByRef RVALUE As Double, _
    ByRef COMM As Double, _
    ByRef LCOMM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Function E05JHF Lib "FLDLL224M_nag.dll" ( _
    ByVal OPTSTR As string, ByVal OPTSTRLength As Integer, _
    ByRef COMM As Double, _
    ByRef LCOMM As Integer, _
    ByRef IFAIL As Integer _
   ) as Integer


   Declare Sub E05JJF Lib "FLDLL224M_nag.dll" ( _
    ByVal OPTSTR As string, ByVal OPTSTRLength As Integer, _
    ByVal CVALUE As string, ByVal CVALUELength As Integer, _
    ByRef COMM As Double, _
    ByRef LCOMM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E05JKF Lib "FLDLL224M_nag.dll" ( _
    ByVal OPTSTR As string, ByVal OPTSTRLength As Integer, _
    ByRef IVALUE As Integer, _
    ByRef COMM As Double, _
    ByRef LCOMM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub E05JLF Lib "FLDLL224M_nag.dll" ( _
    ByVal OPTSTR As string, ByVal OPTSTRLength As Integer, _
    ByRef RVALUE As Double, _
    ByRef COMM As Double, _
    ByRef LCOMM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01ABF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef N As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef Z As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01ADF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01BLF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef T As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef AIJMAX As Double, _
    ByRef IRANK As Integer, _
    ByRef INC As Integer, _
    ByRef D As Double, _
    ByRef U As Double, _
    ByRef LDU As Integer, _
    ByRef DU As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01BRF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NZ As Integer, _
    ByRef A As Double, _
    ByRef LICN As Integer, _
    ByRef IRN As Integer, _
    ByRef LIRN As Integer, _
    ByRef ICN As Integer, _
    ByRef PIVOT As Double, _
    ByRef IKEEP As Integer, _
    ByRef IW As Integer, _
    ByRef W As Double, _
    ByRef LBLOCK As Integer, _
    ByRef GROW As Integer, _
    ByRef ABORT As Integer, _
    ByRef IDISP As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01BSF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NZ As Integer, _
    ByRef A As Double, _
    ByRef LICN As Integer, _
    ByRef IVECT As Integer, _
    ByRef JVECT As Integer, _
    ByRef ICN As Integer, _
    ByRef IKEEP As Integer, _
    ByRef IW As Integer, _
    ByRef W As Double, _
    ByRef GROW As Integer, _
    ByRef ETA As Double, _
    ByRef RPMIN As Double, _
    ByRef ABORT As Integer, _
    ByRef IDISP As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01BUF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef M1 As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef W As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01BVF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef MA1 As Integer, _
    ByRef MB1 As Integer, _
    ByRef M3 As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef V As Double, _
    ByRef LDV As Integer, _
    ByRef W As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01CKF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef C As Double, _
    ByRef N As Integer, _
    ByRef P As Integer, _
    ByRef M As Integer, _
    ByRef Z As Double, _
    ByRef IZ As Integer, _
    ByRef OPT As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01CRF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef MN As Integer, _
    ByRef MOVE As Integer, _
    ByRef LMOVE As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01CTF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANSA As string, ByVal TRANSALength As Integer, _
    ByVal TRANSB As string, ByVal TRANSBLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef BETA As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01CWF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANSA As string, ByVal TRANSALength As Integer, _
    ByVal TRANSB As string, ByVal TRANSBLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef BETA As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef C As Complex, _
    ByRef LDC As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01ECF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01LEF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LAMBDA As Double, _
    ByRef B As Double, _
    ByRef C As Double, _
    ByRef TOL As Double, _
    ByRef D As Double, _
    ByRef IPIV As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01LHF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NBLOKS As Integer, _
    ByRef BLKSTR As Integer, _
    ByRef A As Double, _
    ByRef LENA As Integer, _
    ByRef PIVOT As Integer, _
    ByRef TOL As Double, _
    ByRef KPIVOT As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01MCF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LAL As Integer, _
    ByRef NROW As Integer, _
    ByRef AL As Double, _
    ByRef D As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01QGF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef ZETA As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01QJF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef ZETA As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01QKF Lib "FLDLL224M_nag.dll" ( _
    ByVal WHERET As string, ByVal WHERETLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef NROWP As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef ZETA As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01RGF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef THETA As Complex, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01RJF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef THETA As Complex, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01RKF Lib "FLDLL224M_nag.dll" ( _
    ByVal WHERET As string, ByVal WHERETLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef NROWP As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef THETA As Complex, _
    ByRef WORK As Complex, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01ZAF Lib "FLDLL224M_nag.dll" ( _
    ByVal JOB As string, ByVal JOBLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01ZBF Lib "FLDLL224M_nag.dll" ( _
    ByVal JOB As string, ByVal JOBLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01ZCF Lib "FLDLL224M_nag.dll" ( _
    ByVal JOB As string, ByVal JOBLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F01ZDF Lib "FLDLL224M_nag.dll" ( _
    ByVal JOB As string, ByVal JOBLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02BJF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef EPS1 As Double, _
    ByRef ALFR As Double, _
    ByRef ALFI As Double, _
    ByRef BETA As Double, _
    ByRef MATV As Integer, _
    ByRef V As Double, _
    ByRef LDV As Integer, _
    ByRef ITER As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02EAF Lib "FLDLL224M_nag.dll" ( _
    ByVal JOB As string, ByVal JOBLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef WR As Double, _
    ByRef WI As Double, _
    ByRef Z As Double, _
    ByRef LDZ As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02EBF Lib "FLDLL224M_nag.dll" ( _
    ByVal JOB As string, ByVal JOBLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef WR As Double, _
    ByRef WI As Double, _
    ByRef VR As Double, _
    ByRef LDVR As Integer, _
    ByRef VI As Double, _
    ByRef LDVI As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02ECF Lib "FLDLL224M_nag.dll" ( _
    ByVal CRIT As string, ByVal CRITLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef WL As Double, _
    ByRef WU As Double, _
    ByRef MEST As Integer, _
    ByRef M As Integer, _
    ByRef WR As Double, _
    ByRef WI As Double, _
    ByRef VR As Double, _
    ByRef LDVR As Integer, _
    ByRef VI As Double, _
    ByRef LDVI As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IWORK As Integer, _
    ByRef BWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02FAF Lib "FLDLL224M_nag.dll" ( _
    ByVal JOB As string, ByVal JOBLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef W As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02FCF Lib "FLDLL224M_nag.dll" ( _
    ByVal JOB As string, ByVal JOBLength As Integer, _
    ByVal RANGE As string, ByVal RANGELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef WL As Double, _
    ByRef WU As Double, _
    ByRef IL As Integer, _
    ByRef IU As Integer, _
    ByRef MEST As Integer, _
    ByRef M As Integer, _
    ByRef W As Double, _
    ByRef Z As Double, _
    ByRef LDZ As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02FDF Lib "FLDLL224M_nag.dll" ( _
    ByRef ITYPE As Integer, _
    ByVal JOB As string, ByVal JOBLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef W As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02FHF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef MA As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef MB As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef D As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


  Delegate Function F02FJF_DOT_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef N As Integer, _
    ByVal Z_rptr As IntPtr, _
    ByVal W_rptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr, _
    ByRef LRUSER As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByRef LIUSER As Integer _
  ) as Double

  Delegate Sub F02FJF_IMAGE_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef N As Integer, _
    ByVal Z_rptr As IntPtr, _
    ByVal W_rptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr, _
    ByRef LRUSER As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByRef LIUSER As Integer _
  )

  Delegate Sub F02FJF_MONIT_DELEGATE( _
    ByRef ISTATE As Integer, _
    ByRef NEXTIT As Integer, _
    ByRef NEVALS As Integer, _
    ByRef NEVECS As Integer, _
    ByRef K As Integer, _
    ByVal F_rptr As IntPtr, _
    ByVal D_rptr As IntPtr _
  )

   Declare Sub F02FJZ Lib "FLDLL224M_nag.dll" ( _
    ByRef ISTATE As Integer, _
    ByRef NEXTIT As Integer, _
    ByRef NEVALS As Integer, _
    ByRef NEVECS As Integer, _
    ByRef K As Integer, _
    ByVal F_rptr As IntPtr, _
    ByVal D_rptr As IntPtr _
  )

   Declare Sub F02FJF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef M As Integer, _
    ByRef K As Integer, _
    ByRef NOITS As Integer, _
    ByRef TOL As Double, _
    ByVal DOT As F02FJF_DOT_DELEGATE, _
    ByVal IMAGE As F02FJF_IMAGE_DELEGATE, _
    ByVal MONIT As F02FJF_MONIT_DELEGATE, _
    ByRef NOVECS As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef D As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef RUSER As Double, _
    ByRef LRUSER As Integer, _
    ByRef IUSER As Integer, _
    ByRef LIUSER As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02GAF Lib "FLDLL224M_nag.dll" ( _
    ByVal JOB As string, ByVal JOBLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef W As Complex, _
    ByRef Z As Complex, _
    ByRef LDZ As Integer, _
    ByRef RWORK As Double, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02GBF Lib "FLDLL224M_nag.dll" ( _
    ByVal JOB As string, ByVal JOBLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef W As Complex, _
    ByRef V As Complex, _
    ByRef LDV As Integer, _
    ByRef RWORK As Double, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02GCF Lib "FLDLL224M_nag.dll" ( _
    ByVal CRIT As string, ByVal CRITLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef WL As Double, _
    ByRef WU As Double, _
    ByRef MEST As Integer, _
    ByRef M As Integer, _
    ByRef W As Complex, _
    ByRef V As Complex, _
    ByRef LDV As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef RWORK As Double, _
    ByRef IWORK As Integer, _
    ByRef BWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02GJF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, ByRef AR As Double, ByRef LDAR As Integer, _
    ByRef AI As Double, ByRef LDAI As Integer, ByRef BR As Double, _
    ByRef LDBR As Integer, ByRef BI As Double, ByRef LDBI As Integer, _
    ByRef EPS1 As Double, ByRef ALFR As Double, ByRef ALFI As Double, _
    ByRef BETA As Double, ByRef MATV As Integer, ByRef VR As Double, _
    ByRef LDVR As Integer, ByRef VI As Double, ByRef LDVI As Integer, _
    ByRef ITER As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub F02HAF Lib "FLDLL224M_nag.dll" ( _
    ByVal JOB As string, ByVal JOBLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef W As Double, _
    ByRef RWORK As Double, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02HCF Lib "FLDLL224M_nag.dll" ( _
    ByVal JOB As string, ByVal JOBLength As Integer, ByVal RANGE As string, ByVal RANGELength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, ByRef A As Complex, ByRef LDA As Integer, _
    ByRef WL As Double, ByRef WU As Double, ByRef IL As Integer, _
    ByRef IU As Integer, ByRef MEST As Integer, ByRef M As Integer, _
    ByRef W As Double, ByRef Z As Complex, ByRef LDZ As Integer, _
    ByRef WORK As Complex, ByRef LWORK As Integer, ByRef RWORK As Double, _
    ByRef IWORK As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub F02HDF Lib "FLDLL224M_nag.dll" ( _
    ByRef ITYPE As Integer, _
    ByVal JOB As string, ByVal JOBLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef W As Double, _
    ByRef RWORK As Double, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02SDF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef MA1 As Integer, _
    ByRef MB1 As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef SYM As Integer, _
    ByRef RELEP As Double, _
    ByRef RMU As Double, _
    ByRef VEC As Double, _
    ByRef D As Double, _
    ByRef IWORK As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02WDF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, ByRef N As Integer, ByRef A As Double, _
    ByRef LDA As Integer, ByRef WANTB As Integer, ByRef B As Double, _
    ByRef TOL As Double, ByRef SVD As Integer, ByRef IRANK As Integer, _
    ByRef Z As Double, ByRef SV As Double, ByRef WANTR As Integer, _
    ByRef R As Double, ByRef LDR As Integer, ByRef WANTPT As Integer, _
    ByRef PT As Double, ByRef LDPT As Integer, ByRef WORK As Double, _
    ByRef LWORK As Integer, ByRef IFAIL As Integer _
   )


   Declare Sub F02WEF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef NCOLB As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef WANTQ As Integer, _
    ByRef Q As Double, _
    ByRef LDQ As Integer, _
    ByRef SV As Double, _
    ByRef WANTP As Integer, _
    ByRef PT As Double, _
    ByRef LDPT As Integer, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub F02WGF_AV_DELEGATE( _
    ByRef IFLAG As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal AX_rptr As IntPtr, _
    ByVal IUSER_iptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr _
  )

   Declare Sub F02WGF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef NCV As Integer, _
    ByVal AV As F02WGF_AV_DELEGATE, _
    ByRef NCONV As Integer, _
    ByRef SIGMA As Double, _
    ByRef U As Double, _
    ByRef LDU As Integer, _
    ByRef V As Double, _
    ByRef LDV As Integer, _
    ByRef RESID As Double, _
    ByRef IUSER As Integer, _
    ByRef RUSER As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02WUF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef NCOLB As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef WANTQ As Integer, _
    ByRef Q As Double, _
    ByRef LDQ As Integer, _
    ByRef SV As Double, _
    ByRef WANTP As Integer, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02XEF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef NCOLB As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef WANTQ As Integer, _
    ByRef Q As Complex, _
    ByRef LDQ As Integer, _
    ByRef SV As Double, _
    ByRef WANTP As Integer, _
    ByRef PH As Complex, _
    ByRef LDPH As Integer, _
    ByRef RWORK As Double, _
    ByRef CWORK As Complex, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F02XUF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef NCOLB As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef WANTQ As Integer, _
    ByRef Q As Complex, _
    ByRef LDQ As Integer, _
    ByRef SV As Double, _
    ByRef WANTP As Integer, _
    ByRef RWORK As Double, _
    ByRef CWORK As Complex, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F03AAF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef N As Integer, _
    ByRef DET As Double, _
    ByRef WKSPCE As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F03ABF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef N As Integer, _
    ByRef DET As Double, _
    ByRef WKSPCE As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F03ACF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef N As Integer, _
    ByRef M As Integer, _
    ByRef DET As Double, _
    ByRef RL As Double, _
    ByRef LDRL As Integer, _
    ByRef M1 As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F03ADF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef N As Integer, _
    ByRef DETR As Double, _
    ByRef DETI As Double, _
    ByRef WKSPCE As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F03AEF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef P As Double, _
    ByRef D1 As Double, _
    ByRef ID As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F03AFF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef EPS As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef D1 As Double, _
    ByRef ID As Integer, _
    ByRef P As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04AAF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef N As Integer, _
    ByRef M As Integer, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByRef WKSPCE As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04ABF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef N As Integer, _
    ByRef M As Integer, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByRef WKSPCE As Double, _
    ByRef BB As Double, _
    ByRef LDBB As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04ACF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef N As Integer, _
    ByRef M As Integer, _
    ByRef IR As Integer, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByRef RL As Double, _
    ByRef LDRL As Integer, _
    ByRef M1 As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04ADF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef N As Integer, _
    ByRef M As Integer, _
    ByRef C As Complex, _
    ByRef LDC As Integer, _
    ByRef WKSPCE As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04AEF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef N As Integer, _
    ByRef M As Integer, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByRef WKSPCE As Double, _
    ByRef AA As Double, _
    ByRef LDAA As Integer, _
    ByRef BB As Double, _
    ByRef LDBB As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04AFF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef IR As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef P As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef EPS As Double, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef BB As Double, _
    ByRef LDBB As Integer, _
    ByRef K As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04AGF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef IR As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef P As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer _
   )


   Declare Sub F04AHF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef IR As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef AA As Double, _
    ByRef LDAA As Integer, _
    ByRef P As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef EPS As Double, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef BB As Double, _
    ByRef LDBB As Integer, _
    ByRef K As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04AJF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef IR As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef P As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer _
   )


   Declare Sub F04AMF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef IR As Integer, _
    ByRef EPS As Double, _
    ByRef QR As Double, _
    ByRef LDQR As Integer, _
    ByRef ALPHA As Double, _
    ByRef E As Double, _
    ByRef Y As Double, _
    ByRef Z As Double, _
    ByRef R As Double, _
    ByRef IPIV As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04ARF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef N As Integer, _
    ByRef C As Double, _
    ByRef WKSPCE As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04ASF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef N As Integer, _
    ByRef C As Double, _
    ByRef WK1 As Double, _
    ByRef WK2 As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04ATF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef N As Integer, _
    ByRef C As Double, _
    ByRef AA As Double, _
    ByRef LDAA As Integer, _
    ByRef WKS1 As Double, _
    ByRef WKS2 As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04AXF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LICN As Integer, _
    ByRef ICN As Integer, _
    ByRef IKEEP As Integer, _
    ByRef RHS As Double, _
    ByRef W As Double, _
    ByRef MTYPE As Integer, _
    ByRef IDISP As Integer, _
    ByRef RESID As Double _
   )


   Declare Sub F04BAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04BBF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04BCF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef DL As Double, _
    ByRef D As Double, _
    ByRef DU As Double, _
    ByRef DU2 As Double, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04BDF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04BEF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04BFF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04BGF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04BHF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04BJF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04CAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04CBF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04CCF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef DL As Complex, _
    ByRef D As Complex, _
    ByRef DU As Complex, _
    ByRef DU2 As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04CDF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04CEF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04CFF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04CGF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04CHF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04CJF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04DHF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04DJF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef RCOND As Double, _
    ByRef ERRBND As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04EAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef D As Double, _
    ByRef DU As Double, _
    ByRef DL As Double, _
    ByRef B As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04FAF Lib "FLDLL224M_nag.dll" ( _
    ByRef JOB As Integer, _
    ByRef N As Integer, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef B As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04FEF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByRef WANTP As Integer, _
    ByRef P As Double, _
    ByRef WANTV As Integer, _
    ByRef V As Double, _
    ByRef VLAST As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04FFF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef T As Double, _
    ByRef B As Double, _
    ByRef X As Double, _
    ByRef WANTP As Integer, _
    ByRef P As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04JAF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef TOL As Double, _
    ByRef SIGMA As Double, _
    ByRef IRANK As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04JDF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef TOL As Double, _
    ByRef SIGMA As Double, _
    ByRef IRANK As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04JGF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef TOL As Double, _
    ByRef SVD As Integer, _
    ByRef SIGMA As Double, _
    ByRef IRANK As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04JLF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef P As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef D As Double, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04JMF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef P As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef C As Double, _
    ByRef D As Double, _
    ByRef X As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04KLF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef P As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef D As Complex, _
    ByRef X As Complex, _
    ByRef Y As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04KMF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef P As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef C As Complex, _
    ByRef D As Complex, _
    ByRef X As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04LEF Lib "FLDLL224M_nag.dll" ( _
    ByRef JOB As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef C As Double, _
    ByRef D As Double, _
    ByRef IPIV As Integer, _
    ByRef Y As Double, _
    ByRef TOL As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04LHF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef NBLOKS As Integer, _
    ByRef BLKSTR As Integer, _
    ByRef A As Double, _
    ByRef LENA As Integer, _
    ByRef PIVOT As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef IR As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04MCF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef AL As Double, _
    ByRef LAL As Integer, _
    ByRef D As Double, _
    ByRef NROW As Integer, _
    ByRef IR As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef ISELCT As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04MEF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef T As Double, _
    ByRef X As Double, _
    ByRef V As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04MFF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef T As Double, _
    ByRef B As Double, _
    ByRef X As Double, _
    ByRef P As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


  Delegate Sub F04QAF_APROD_DELEGATE( _
    ByRef MODE As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByVal X_rptr As IntPtr, _
    ByVal Y_rptr As IntPtr, _
    ByVal RUSER_rptr As IntPtr, _
    ByRef LRUSER As Integer, _
    ByVal IUSER_iptr As IntPtr, _
    ByRef LIUSER As Integer _
  )

   Declare Sub F04QAF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, ByRef N As Integer, ByRef B As Double, _
    ByRef X As Double, ByRef SE As Double, ByVal APROD As F04QAF_APROD_DELEGATE, _
    ByRef DAMP As Double, ByRef ATOL As Double, ByRef BTOL As Double, _
    ByRef CONLIM As Double, ByRef ITNLIM As Integer, ByRef MSGLVL As Integer, _
    ByRef ITN As Integer, ByRef ANORM As Double, ByRef ACOND As Double, _
    ByRef RNORM As Double, ByRef ARNORM As Double, ByRef XNORM As Double, _
    ByRef WORK As Double, ByRef RUSER As Double, ByRef LRUSER As Integer, _
    ByRef IUSER As Integer, ByRef LIUSER As Integer, ByRef INFORM As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04YAF Lib "FLDLL224M_nag.dll" ( _
    ByRef JOB As Integer, _
    ByRef P As Integer, _
    ByRef SIGMA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef SVD As Integer, _
    ByRef IRANK As Integer, _
    ByRef SV As Double, _
    ByRef CJ As Double, _
    ByRef WORK As Double, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04YCF Lib "FLDLL224M_nag.dll" ( _
    ByRef ICASE As Integer, _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef ESTNRM As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F04ZCF Lib "FLDLL224M_nag.dll" ( _
    ByRef ICASE As Integer, _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef ESTNRM As Double, _
    ByRef WORK As Complex, _
    ByRef IFAIL As Integer _
   )


   Declare Sub F05AAF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef M As Integer, _
    ByRef N1 As Integer, _
    ByRef N2 As Integer, _
    ByRef S As Double, _
    ByRef CC As Double, _
    ByRef ICOL As Integer, _
    ByRef IFAIL As Integer _
   )


   Declare Sub DROTG Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef C As Double, _
    ByRef S As Double _
   )

   Declare Sub F06AAF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef C As Double, _
    ByRef S As Double _
   )


   Declare Sub F06BAF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef C As Double, _
    ByRef S As Double _
   )


   Declare Sub F06BCF Lib "FLDLL224M_nag.dll" ( _
    ByRef T As Double, _
    ByRef C As Double, _
    ByRef S As Double _
   )


   Declare Sub F06BEF Lib "FLDLL224M_nag.dll" ( _
    ByVal JOB As string, ByVal JOBLength As Integer, _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef Z As Double, _
    ByRef C As Double, _
    ByRef S As Double _
   )


   Declare Sub F06BHF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Double, _
    ByRef Y As Double, _
    ByRef Z As Double, _
    ByRef C As Double, _
    ByRef S As Double _
   )


   Declare Function F06BLF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef FAIL As Integer _
   ) as Double


   Declare Function F06BMF Lib "FLDLL224M_nag.dll" ( _
    ByRef SCAL As Double, _
    ByRef SSQ As Double _
   ) as Double


   Declare Function F06BNF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef B As Double _
   ) as Double


   Declare Function F06BPF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Double, _
    ByRef B As Double, _
    ByRef C As Double _
   ) as Double


   Declare Sub F06CAF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Complex, _
    ByRef B As Complex, _
    ByRef C As Double, _
    ByRef S As Complex _
   )


   Declare Sub F06CBF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Complex, _
    ByRef B As Complex, _
    ByRef C As Complex, _
    ByRef S As Double _
   )


   Declare Sub F06CCF Lib "FLDLL224M_nag.dll" ( _
    ByRef T As Complex, _
    ByRef C As Double, _
    ByRef S As Complex _
   )


   Declare Sub F06CDF Lib "FLDLL224M_nag.dll" ( _
    ByRef T As Complex, _
    ByRef C As Complex, _
    ByRef S As Double _
   )


   Declare Sub F06CHF Lib "FLDLL224M_nag.dll" ( _
    ByRef X As Complex, _
    ByRef Y As Complex, _
    ByRef Z As Complex, _
    ByRef C As Double, _
    ByRef S As Complex _
   )


   Declare Function F06CLF Lib "FLDLL224M_nag.dll" ( _
    ByRef A As Complex, _
    ByRef B As Complex, _
    ByRef FAIL As Integer _
   ) as Complex


   Declare Sub F06DBF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef CON As Integer, _
    ByRef X As Integer, _
    ByRef INCX As Integer _
   )


   Declare Sub F06DFF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Integer, _
    ByRef INCX As Integer, _
    ByRef Y As Integer, _
    ByRef INCY As Integer _
   )


   Declare Function DDOT Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   ) as Double

   Declare Function F06EAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   ) as Double


   Declare Sub DAXPY Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )

   Declare Sub F06ECF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )


   Declare Sub DSCAL Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )

   Declare Sub F06EDF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )


   Declare Sub DCOPY Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )

   Declare Sub F06EFF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )


   Declare Sub DSWAP Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )

   Declare Sub F06EGF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )


   Declare Function DNRM2 Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   ) as Double

   Declare Function F06EJF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   ) as Double


   Declare Function DASUM Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   ) as Double

   Declare Function F06EKF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   ) as Double


   Declare Sub DROT Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer, _
    ByRef C As Double, _
    ByRef S As Double _
   )

   Declare Sub F06EPF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer, _
    ByRef C As Double, _
    ByRef S As Double _
   )


   Declare Function DDOTI Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef X As Double, _
    ByRef INDX As Integer, _
    ByRef Y As Double _
   ) as Double

   Declare Function F06ERF Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef X As Double, _
    ByRef INDX As Integer, _
    ByRef Y As Double _
   ) as Double


   Declare Sub DAXPYI Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef A As Double, _
    ByRef X As Double, _
    ByRef INDX As Integer, _
    ByRef Y As Double _
   )

   Declare Sub F06ETF Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef A As Double, _
    ByRef X As Double, _
    ByRef INDX As Integer, _
    ByRef Y As Double _
   )


   Declare Sub DGTHR Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef Y As Double, _
    ByRef X As Double, _
    ByRef INDX As Integer _
   )

   Declare Sub F06EUF Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef Y As Double, _
    ByRef X As Double, _
    ByRef INDX As Integer _
   )


   Declare Sub DGTHRZ Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef Y As Double, _
    ByRef X As Double, _
    ByRef INDX As Integer _
   )

   Declare Sub F06EVF Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef Y As Double, _
    ByRef X As Double, _
    ByRef INDX As Integer _
   )


   Declare Sub DSCTR Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef X As Double, _
    ByRef INDX As Integer, _
    ByRef Y As Double _
   )

   Declare Sub F06EWF Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef X As Double, _
    ByRef INDX As Integer, _
    ByRef Y As Double _
   )


   Declare Sub DROTI Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef X As Double, _
    ByRef INDX As Integer, _
    ByRef Y As Double, _
    ByRef C As Double, _
    ByRef S As Double _
   )

   Declare Sub F06EXF Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef X As Double, _
    ByRef INDX As Integer, _
    ByRef Y As Double, _
    ByRef C As Double, _
    ByRef S As Double _
   )


   Declare Function F06FAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef J As Integer, _
    ByRef TOLX As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef TOLY As Double, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   ) as Double


   Declare Sub F06FBF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef CON As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )


   Declare Sub F06FCF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef D As Double, _
    ByRef INCD As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )


   Declare Sub F06FDF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )


   Declare Sub F06FEF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )


   Declare Sub F06FGF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )


   Declare Sub F06FJF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef SCAL As Double, _
    ByRef SUMSQ As Double _
   )


   Declare Function F06FKF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef W As Double, _
    ByRef INCW As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   ) as Double


   Declare Sub F06FLF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef XMAX As Double, _
    ByRef XMIN As Double _
   )


   Declare Sub F06FPF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer, _
    ByRef C As Double, _
    ByRef S As Double _
   )


   Declare Sub F06FQF Lib "FLDLL224M_nag.dll" ( _
    ByVal PIVOT As string, ByVal PIVOTLength As Integer, _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef C As Double, _
    ByRef S As Double _
   )


   Declare Sub F06FRF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef TOL As Double, _
    ByRef ZETA As Double _
   )


   Declare Sub F06FSF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef TOL As Double, _
    ByRef Z1 As Double _
   )


   Declare Sub F06FTF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef DELTA As Double, _
    ByRef Y As Double, _
    ByRef INCY As Integer, _
    ByRef ZETA As Double, _
    ByRef Z As Double, _
    ByRef INCZ As Integer _
   )


   Declare Sub F06FUF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef Z As Double, _
    ByRef INCZ As Integer, _
    ByRef Z1 As Double, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )


   Declare Function ZDOTU Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   ) as Complex

   Declare Function F06GAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   ) as Complex


   Declare Function ZDOTC Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   ) as Complex

   Declare Function F06GBF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   ) as Complex


   Declare Sub ZAXPY Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )

   Declare Sub F06GCF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )


   Declare Sub ZSCAL Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )

   Declare Sub F06GDF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )


   Declare Sub ZCOPY Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )

   Declare Sub F06GFF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )


   Declare Sub ZSWAP Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )

   Declare Sub F06GGF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )


   Declare Function ZDOTUI Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef X As Complex, _
    ByRef INDX As Integer, _
    ByRef Y As Complex _
   ) as Complex

   Declare Function F06GRF Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef X As Complex, _
    ByRef INDX As Integer, _
    ByRef Y As Complex _
   ) as Complex


   Declare Function ZDOTCI Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef X As Complex, _
    ByRef INDX As Integer, _
    ByRef Y As Complex _
   ) as Complex

   Declare Function F06GSF Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef X As Complex, _
    ByRef INDX As Integer, _
    ByRef Y As Complex _
   ) as Complex


   Declare Sub ZAXPYI Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef A As Complex, _
    ByRef X As Complex, _
    ByRef INDX As Integer, _
    ByRef Y As Complex _
   )

   Declare Sub F06GTF Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef A As Complex, _
    ByRef X As Complex, _
    ByRef INDX As Integer, _
    ByRef Y As Complex _
   )


   Declare Sub ZGTHR Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef Y As Complex, _
    ByRef X As Complex, _
    ByRef INDX As Integer _
   )

   Declare Sub F06GUF Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef Y As Complex, _
    ByRef X As Complex, _
    ByRef INDX As Integer _
   )


   Declare Sub ZGTHRZ Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef Y As Complex, _
    ByRef X As Complex, _
    ByRef INDX As Integer _
   )

   Declare Sub F06GVF Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef Y As Complex, _
    ByRef X As Complex, _
    ByRef INDX As Integer _
   )


   Declare Sub ZSCTR Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef X As Complex, _
    ByRef INDX As Integer, _
    ByRef Y As Complex _
   )

   Declare Sub F06GWF Lib "FLDLL224M_nag.dll" ( _
    ByRef NZ As Integer, _
    ByRef X As Complex, _
    ByRef INDX As Integer, _
    ByRef Y As Complex _
   )


   Declare Sub F06HBF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef CON As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )


   Declare Sub F06HCF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef D As Complex, _
    ByRef INCD As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )


   Declare Sub F06HDF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )


   Declare Sub F06HGF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )


   Declare Sub ZROT Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef CX As Complex, _
    ByRef INCX As Integer, _
    ByRef CY As Complex, _
    ByRef INCY As Integer, _
    ByRef C As Double, _
    ByRef S As Complex _
   )

   Declare Sub F06HMF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef CX As Complex, _
    ByRef INCX As Integer, _
    ByRef CY As Complex, _
    ByRef INCY As Integer, _
    ByRef C As Double, _
    ByRef S As Complex _
   )


   Declare Sub F06HPF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer, _
    ByRef C As Complex, _
    ByRef S As Complex _
   )


   Declare Sub F06HQF Lib "FLDLL224M_nag.dll" ( _
    ByVal PIVOT As string, ByVal PIVOTLength As Integer, _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef C As Double, _
    ByRef S As Complex _
   )


   Declare Sub F06HRF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef TOL As Double, _
    ByRef THETA As Complex _
   )


   Declare Sub F06HTF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef DELTA As Complex, _
    ByRef Y As Complex, _
    ByRef INCY As Integer, _
    ByRef THETA As Complex, _
    ByRef Z As Complex, _
    ByRef INCZ As Integer _
   )


   Declare Sub ZDSCAL Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )

   Declare Sub F06JDF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )


   Declare Function DZNRM2 Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   ) as Double

   Declare Function F06JJF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   ) as Double


   Declare Function DZASUM Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   ) as Double

   Declare Function F06JKF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   ) as Double


   Declare Function IDAMAX Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   ) as Integer

   Declare Function F06JLF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   ) as Integer


   Declare Function IZAMAX Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   ) as Integer

   Declare Function F06JMF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   ) as Integer


   Declare Sub F06KCF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef D As Double, _
    ByRef INCD As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )


   Declare Sub F06KDF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )


   Declare Sub F06KEF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )


   Declare Sub F06KFF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )


   Declare Sub F06KJF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef SCAL As Double, _
    ByRef SUMSQ As Double _
   )


   Declare Function F06KLF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef TOL As Double _
   ) as Integer


   Declare Sub F06KPF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer, _
    ByRef C As Double, _
    ByRef S As Double _
   )


   Declare Sub DGEMV Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef BETA As Double, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )

   Declare Sub F06PAF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef BETA As Double, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )


   Declare Sub DGBMV Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef BETA As Double, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )

   Declare Sub F06PBF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef BETA As Double, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )


   Declare Sub DSYMV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef BETA As Double, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )

   Declare Sub F06PCF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef BETA As Double, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )


   Declare Sub DSBMV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef BETA As Double, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )

   Declare Sub F06PDF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef BETA As Double, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )


   Declare Sub DSPMV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef AP As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef BETA As Double, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )

   Declare Sub F06PEF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef AP As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef BETA As Double, _
    ByRef Y As Double, _
    ByRef INCY As Integer _
   )


   Declare Sub DTRMV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )

   Declare Sub F06PFF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )


   Declare Sub DTBMV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )

   Declare Sub F06PGF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )


   Declare Sub DTPMV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )

   Declare Sub F06PHF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )


   Declare Sub DTRSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )

   Declare Sub F06PJF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )


   Declare Sub DTBSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )

   Declare Sub F06PKF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )


   Declare Sub DTPSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )

   Declare Sub F06PLF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer _
   )


   Declare Sub DGER Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer _
   )

   Declare Sub F06PMF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer _
   )


   Declare Sub DSYR Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer _
   )

   Declare Sub F06PPF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer _
   )


   Declare Sub DSPR Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef AP As Double _
   )

   Declare Sub F06PQF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef AP As Double _
   )


   Declare Sub DSYR2 Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer _
   )

   Declare Sub F06PRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer _
   )


   Declare Sub DSPR2 Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer, _
    ByRef AP As Double _
   )

   Declare Sub F06PSF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer, _
    ByRef AP As Double _
   )


   Declare Sub F06QFF Lib "FLDLL224M_nag.dll" ( _
    ByVal MATRIX As string, ByVal MATRIXLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer _
   )


   Declare Sub F06QHF Lib "FLDLL224M_nag.dll" ( _
    ByVal MATRIX As string, ByVal MATRIXLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef CON As Double, _
    ByRef DIAG As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer _
   )


   Declare Sub F06QJF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef PERM As Integer, _
    ByRef K As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer _
   )


   Declare Sub F06QKF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef PERM As Double, _
    ByRef K As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer _
   )


   Declare Sub F06QMF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal PIVOT As string, ByVal PIVOTLength As Integer, _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Double, _
    ByRef S As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer _
   )


   Declare Sub F06QPF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef Y As Double, _
    ByRef INCY As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef C As Double, _
    ByRef S As Double _
   )


   Declare Sub F06QQF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Double, _
    ByRef INCX As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef C As Double, _
    ByRef S As Double _
   )


   Declare Sub F06QRF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Double, _
    ByRef S As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer _
   )


   Declare Sub F06QSF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Double, _
    ByRef S As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer _
   )


   Declare Sub F06QTF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Double, _
    ByRef S As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer _
   )


   Declare Sub F06QVF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Double, _
    ByRef S As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer _
   )


   Declare Sub F06QWF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Double, _
    ByRef S As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer _
   )


   Declare Sub F06QXF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal PIVOT As string, ByVal PIVOTLength As Integer, _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Double, _
    ByRef S As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer _
   )


   Declare Function F06RAF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06RBF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06RCF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06RDF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06REF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06RJF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06RKF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06RLF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06RMF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06RNF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef DL As Double, _
    ByRef D As Double, _
    ByRef DU As Double _
   ) as Double


   Declare Function F06RPF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef D As Double, _
    ByRef E As Double _
   ) as Double


   Declare Sub ZGEMV Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef BETA As Complex, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )

   Declare Sub F06SAF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef BETA As Complex, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )


   Declare Sub ZGBMV Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef BETA As Complex, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )

   Declare Sub F06SBF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef BETA As Complex, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )


   Declare Sub ZHEMV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef BETA As Complex, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )

   Declare Sub F06SCF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef BETA As Complex, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )


   Declare Sub ZHBMV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef BETA As Complex, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )

   Declare Sub F06SDF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef BETA As Complex, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )


   Declare Sub ZHPMV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef AP As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef BETA As Complex, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )

   Declare Sub F06SEF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef AP As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef BETA As Complex, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )


   Declare Sub ZTRMV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )

   Declare Sub F06SFF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )


   Declare Sub ZTBMV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )

   Declare Sub F06SGF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )


   Declare Sub ZTPMV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )

   Declare Sub F06SHF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )


   Declare Sub ZTRSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )

   Declare Sub F06SJF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )


   Declare Sub ZTBSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )

   Declare Sub F06SKF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )


   Declare Sub ZTPSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )

   Declare Sub F06SLF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer _
   )


   Declare Sub ZGERU Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )

   Declare Sub F06SMF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Sub ZGERC Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )

   Declare Sub F06SNF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Sub ZHER Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )

   Declare Sub F06SPF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Sub ZHPR Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef AP As Complex _
   )

   Declare Sub F06SQF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef AP As Complex _
   )


   Declare Sub ZHER2 Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )

   Declare Sub F06SRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Sub ZHPR2 Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer, _
    ByRef AP As Complex _
   )

   Declare Sub F06SSF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer, _
    ByRef AP As Complex _
   )


   Declare Sub F06TAF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef BETA As Complex, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )


   Declare Sub F06TBF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Sub F06TCF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef AP As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef BETA As Complex, _
    ByRef Y As Complex, _
    ByRef INCY As Integer _
   )


   Declare Sub F06TDF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef AP As Complex _
   )


   Declare Sub F06TFF Lib "FLDLL224M_nag.dll" ( _
    ByVal MATRIX As string, ByVal MATRIXLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer _
   )


   Declare Sub F06THF Lib "FLDLL224M_nag.dll" ( _
    ByVal MATRIX As string, ByVal MATRIXLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef CON As Complex, _
    ByRef DIAG As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Sub F06TMF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal PIVOT As string, ByVal PIVOTLength As Integer, _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Double, _
    ByRef S As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Sub F06TPF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef Y As Complex, _
    ByRef INCY As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef C As Double, _
    ByRef S As Complex _
   )


   Declare Sub F06TQF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef X As Complex, _
    ByRef INCX As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef C As Double, _
    ByRef S As Complex _
   )


   Declare Sub F06TRF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Complex, _
    ByRef S As Double, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Sub F06TSF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Double, _
    ByRef S As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Sub F06TTF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Double, _
    ByRef S As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Sub F06TVF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Complex, _
    ByRef S As Double, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Sub F06TWF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Double, _
    ByRef S As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Sub F06TXF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal PIVOT As string, ByVal PIVOTLength As Integer, _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Double, _
    ByRef S As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Sub F06TYF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal PIVOT As string, ByVal PIVOTLength As Integer, _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Complex, _
    ByRef S As Double, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Function F06UAF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06UBF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06UCF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06UDF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06UEF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06UFF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06UGF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06UHF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06UJF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06UKF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06ULF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06UMF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef WORK As Double _
   ) as Double


   Declare Function F06UNF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef DL As Complex, _
    ByRef D As Complex, _
    ByRef DU As Complex _
   ) as Double


   Declare Function F06UPF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef D As Double, _
    ByRef E As Complex _
   ) as Double


   Declare Sub F06VJF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef PERM As Integer, _
    ByRef K As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer _
   )


   Declare Sub F06VKF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef PERM As Double, _
    ByRef K As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer _
   )


   Declare Sub F06VXF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal PIVOT As string, ByVal PIVOTLength As Integer, _
    ByVal DIRECT As string, ByVal DIRECTLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K1 As Integer, _
    ByRef K2 As Integer, _
    ByRef C As Double, _
    ByRef S As Double, _
    ByRef A As Complex, _
    ByRef LDA As Integer _
   )


   Declare Sub DGEMM Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANSA As string, ByVal TRANSALength As Integer, _
    ByVal TRANSB As string, ByVal TRANSBLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef BETA As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer _
   )

   Declare Sub F06YAF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANSA As string, ByVal TRANSALength As Integer, _
    ByVal TRANSB As string, ByVal TRANSBLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef BETA As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer _
   )


   Declare Sub DSYMM Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef BETA As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer _
   )

   Declare Sub F06YCF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef BETA As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer _
   )


   Declare Sub DTRMM Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANSA As string, ByVal TRANSALength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer _
   )

   Declare Sub F06YFF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANSA As string, ByVal TRANSALength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer _
   )


   Declare Sub DTRSM Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANSA As string, ByVal TRANSALength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer _
   )

   Declare Sub F06YJF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANSA As string, ByVal TRANSALength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer _
   )


   Declare Sub DSYRK Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef BETA As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer _
   )

   Declare Sub F06YPF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef BETA As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer _
   )


   Declare Sub DSYR2K Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef BETA As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer _
   )

   Declare Sub F06YRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef BETA As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer _
   )


   Declare Sub ZGEMM Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANSA As string, ByVal TRANSALength As Integer, _
    ByVal TRANSB As string, ByVal TRANSBLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef BETA As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer _
   )

   Declare Sub F06ZAF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANSA As string, ByVal TRANSALength As Integer, _
    ByVal TRANSB As string, ByVal TRANSBLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef BETA As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer _
   )


   Declare Sub ZHEMM Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef BETA As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer _
   )

   Declare Sub F06ZCF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef BETA As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer _
   )


   Declare Sub ZTRMM Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANSA As string, ByVal TRANSALength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer _
   )

   Declare Sub F06ZFF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANSA As string, ByVal TRANSALength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer _
   )


   Declare Sub ZTRSM Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANSA As string, ByVal TRANSALength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer _
   )

   Declare Sub F06ZJF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANSA As string, ByVal TRANSALength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer _
   )


   Declare Sub ZHERK Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef BETA As Double, _
    ByRef C As Complex, _
    ByRef LDC As Integer _
   )

   Declare Sub F06ZPF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Double, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef BETA As Double, _
    ByRef C As Complex, _
    ByRef LDC As Integer _
   )


   Declare Sub ZHER2K Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef BETA As Double, _
    ByRef C As Complex, _
    ByRef LDC As Integer _
   )

   Declare Sub F06ZRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef BETA As Double, _
    ByRef C As Complex, _
    ByRef LDC As Integer _
   )


   Declare Sub ZSYMM Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef BETA As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer _
   )

   Declare Sub F06ZTF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef BETA As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer _
   )


   Declare Sub ZSYRK Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef BETA As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer _
   )

   Declare Sub F06ZUF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef BETA As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer _
   )


   Declare Sub ZSYR2K Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef BETA As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer _
   )

   Declare Sub F06ZWF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef ALPHA As Complex, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef BETA As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer _
   )


   Declare Sub DGESV Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07AAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGESVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef A As Double, ByRef LDA As Integer, _
    ByRef AF As Double, ByRef LDAF As Integer, ByRef IPIV As Integer, _
    ByVal EQUED As string, ByVal EQUEDLength As Integer, ByRef R As Double, ByRef C As Double, _
    ByRef B As Double, ByRef LDB As Integer, ByRef X As Double, _
    ByRef LDX As Integer, ByRef RCOND As Double, ByRef FERR As Double, _
    ByRef BERR As Double, ByRef WORK As Double, ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07ABF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef A As Double, ByRef LDA As Integer, _
    ByRef AF As Double, ByRef LDAF As Integer, ByRef IPIV As Integer, _
    ByVal EQUED As string, ByVal EQUEDLength As Integer, ByRef R As Double, ByRef C As Double, _
    ByRef B As Double, ByRef LDB As Integer, ByRef X As Double, _
    ByRef LDX As Integer, ByRef RCOND As Double, ByRef FERR As Double, _
    ByRef BERR As Double, ByRef WORK As Double, ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DSGESV Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef WORK As Double, _
    ByRef SWORK As Single, _
    ByRef ITER As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07ACF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef WORK As Double, _
    ByRef SWORK As Single, _
    ByRef ITER As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGETRF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07ADF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGETRS Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07AEF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGEEQU Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef R As Double, _
    ByRef C As Double, _
    ByRef ROWCND As Double, _
    ByRef COLCND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07AFF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef R As Double, _
    ByRef C As Double, _
    ByRef ROWCND As Double, _
    ByRef COLCND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub DGECON Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07AGF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGERFS Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef AF As Double, _
    ByRef LDAF As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07AHF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef AF As Double, _
    ByRef LDAF As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGETRI Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07AJF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGESV Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07ANF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGESVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef A As Complex, ByRef LDA As Integer, _
    ByRef AF As Complex, ByRef LDAF As Integer, ByRef IPIV As Integer, _
    ByVal EQUED As string, ByVal EQUEDLength As Integer, ByRef R As Double, ByRef C As Double, _
    ByRef B As Complex, ByRef LDB As Integer, ByRef X As Complex, _
    ByRef LDX As Integer, ByRef RCOND As Double, ByRef FERR As Double, _
    ByRef BERR As Double, ByRef WORK As Complex, ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07APF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef A As Complex, ByRef LDA As Integer, _
    ByRef AF As Complex, ByRef LDAF As Integer, ByRef IPIV As Integer, _
    ByVal EQUED As string, ByVal EQUEDLength As Integer, ByRef R As Double, ByRef C As Double, _
    ByRef B As Complex, ByRef LDB As Integer, ByRef X As Complex, _
    ByRef LDX As Integer, ByRef RCOND As Double, ByRef FERR As Double, _
    ByRef BERR As Double, ByRef WORK As Complex, ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZCGESV Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef WORK As Complex, _
    ByRef SWORK As ComplexSingle, _
    ByRef ITER As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07AQF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef WORK As Complex, _
    ByRef SWORK As ComplexSingle, _
    ByRef ITER As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGETRF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07ARF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGETRS Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07ASF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGEEQU Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef R As Double, _
    ByRef C As Double, _
    ByRef ROWCND As Double, _
    ByRef COLCND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07ATF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef R As Double, _
    ByRef C As Double, _
    ByRef ROWCND As Double, _
    ByRef COLCND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGECON Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07AUF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGERFS Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef AF As Complex, _
    ByRef LDAF As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07AVF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef AF As Complex, _
    ByRef LDAF As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGETRI Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07AWF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGBSV Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07BAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGBSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, _
    ByRef KL As Integer, ByRef KU As Integer, ByRef NRHS As Integer, _
    ByRef AB As Double, ByRef LDAB As Integer, ByRef AFB As Double, _
    ByRef LDAFB As Integer, ByRef IPIV As Integer, ByVal EQUED As string, ByVal EQUEDLength As Integer, _
    ByRef R As Double, ByRef C As Double, ByRef B As Double, _
    ByRef LDB As Integer, ByRef X As Double, ByRef LDX As Integer, _
    ByRef RCOND As Double, ByRef FERR As Double, ByRef BERR As Double, _
    ByRef WORK As Double, ByRef IWORK As Integer, ByRef INFO As Integer _
   )

   Declare Sub F07BBF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, _
    ByRef KL As Integer, ByRef KU As Integer, ByRef NRHS As Integer, _
    ByRef AB As Double, ByRef LDAB As Integer, ByRef AFB As Double, _
    ByRef LDAFB As Integer, ByRef IPIV As Integer, ByVal EQUED As string, ByVal EQUEDLength As Integer, _
    ByRef R As Double, ByRef C As Double, ByRef B As Double, _
    ByRef LDB As Integer, ByRef X As Double, ByRef LDX As Integer, _
    ByRef RCOND As Double, ByRef FERR As Double, ByRef BERR As Double, _
    ByRef WORK As Double, ByRef IWORK As Integer, ByRef INFO As Integer _
   )


   Declare Sub DGBTRF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07BDF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGBTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07BEF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGBEQU Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef R As Double, _
    ByRef C As Double, _
    ByRef ROWCND As Double, _
    ByRef COLCND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07BFF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef R As Double, _
    ByRef C As Double, _
    ByRef ROWCND As Double, _
    ByRef COLCND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub DGBCON Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07BGF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGBRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef AFB As Double, _
    ByRef LDAFB As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07BHF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef AFB As Double, _
    ByRef LDAFB As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGBSV Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07BNF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGBSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, _
    ByRef KL As Integer, ByRef KU As Integer, ByRef NRHS As Integer, _
    ByRef AB As Complex, ByRef LDAB As Integer, ByRef AFB As Complex, _
    ByRef LDAFB As Integer, ByRef IPIV As Integer, ByVal EQUED As string, ByVal EQUEDLength As Integer, _
    ByRef R As Double, ByRef C As Double, ByRef B As Complex, _
    ByRef LDB As Integer, ByRef X As Complex, ByRef LDX As Integer, _
    ByRef RCOND As Double, ByRef FERR As Double, ByRef BERR As Double, _
    ByRef WORK As Complex, ByRef RWORK As Double, ByRef INFO As Integer _
   )

   Declare Sub F07BPF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, _
    ByRef KL As Integer, ByRef KU As Integer, ByRef NRHS As Integer, _
    ByRef AB As Complex, ByRef LDAB As Integer, ByRef AFB As Complex, _
    ByRef LDAFB As Integer, ByRef IPIV As Integer, ByVal EQUED As string, ByVal EQUEDLength As Integer, _
    ByRef R As Double, ByRef C As Double, ByRef B As Complex, _
    ByRef LDB As Integer, ByRef X As Complex, ByRef LDX As Integer, _
    ByRef RCOND As Double, ByRef FERR As Double, ByRef BERR As Double, _
    ByRef WORK As Complex, ByRef RWORK As Double, ByRef INFO As Integer _
   )


   Declare Sub ZGBTRF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07BRF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGBTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07BSF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGBEQU Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef R As Double, _
    ByRef C As Double, _
    ByRef ROWCND As Double, _
    ByRef COLCND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07BTF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef R As Double, _
    ByRef C As Double, _
    ByRef ROWCND As Double, _
    ByRef COLCND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGBCON Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07BUF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGBRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef AFB As Complex, _
    ByRef LDAFB As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07BVF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef KL As Integer, _
    ByRef KU As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef AFB As Complex, _
    ByRef LDAFB As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub DGTSV Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef DL As Double, _
    ByRef D As Double, _
    ByRef DU As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07CAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef DL As Double, _
    ByRef D As Double, _
    ByRef DU As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGTSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef DL As Double, ByRef D As Double, _
    ByRef DU As Double, ByRef DLF As Double, ByRef DF As Double, _
    ByRef DUF As Double, ByRef DU2 As Double, ByRef IPIV As Integer, _
    ByRef B As Double, ByRef LDB As Integer, ByRef X As Double, _
    ByRef LDX As Integer, ByRef RCOND As Double, ByRef FERR As Double, _
    ByRef BERR As Double, ByRef WORK As Double, ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07CBF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef DL As Double, ByRef D As Double, _
    ByRef DU As Double, ByRef DLF As Double, ByRef DF As Double, _
    ByRef DUF As Double, ByRef DU2 As Double, ByRef IPIV As Integer, _
    ByRef B As Double, ByRef LDB As Integer, ByRef X As Double, _
    ByRef LDX As Integer, ByRef RCOND As Double, ByRef FERR As Double, _
    ByRef BERR As Double, ByRef WORK As Double, ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGTTRF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef DL As Double, _
    ByRef D As Double, _
    ByRef DU As Double, _
    ByRef DU2 As Double, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07CDF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef DL As Double, _
    ByRef D As Double, _
    ByRef DU As Double, _
    ByRef DU2 As Double, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGTTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef DL As Double, _
    ByRef D As Double, _
    ByRef DU As Double, _
    ByRef DU2 As Double, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07CEF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef DL As Double, _
    ByRef D As Double, _
    ByRef DU As Double, _
    ByRef DU2 As Double, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGTCON Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef DL As Double, _
    ByRef D As Double, _
    ByRef DU As Double, _
    ByRef DU2 As Double, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07CGF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef DL As Double, _
    ByRef D As Double, _
    ByRef DU As Double, _
    ByRef DU2 As Double, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGTRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, ByRef NRHS As Integer, _
    ByRef DL As Double, ByRef D As Double, ByRef DU As Double, _
    ByRef DLF As Double, ByRef DF As Double, ByRef DUF As Double, _
    ByRef DU2 As Double, ByRef IPIV As Integer, ByRef B As Double, _
    ByRef LDB As Integer, ByRef X As Double, ByRef LDX As Integer, _
    ByRef FERR As Double, ByRef BERR As Double, ByRef WORK As Double, _
    ByRef IWORK As Integer, ByRef INFO As Integer _
   )

   Declare Sub F07CHF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, ByRef NRHS As Integer, _
    ByRef DL As Double, ByRef D As Double, ByRef DU As Double, _
    ByRef DLF As Double, ByRef DF As Double, ByRef DUF As Double, _
    ByRef DU2 As Double, ByRef IPIV As Integer, ByRef B As Double, _
    ByRef LDB As Integer, ByRef X As Double, ByRef LDX As Integer, _
    ByRef FERR As Double, ByRef BERR As Double, ByRef WORK As Double, _
    ByRef IWORK As Integer, ByRef INFO As Integer _
   )


   Declare Sub ZGTSV Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef DL As Complex, _
    ByRef D As Complex, _
    ByRef DU As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07CNF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef DL As Complex, _
    ByRef D As Complex, _
    ByRef DU As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGTSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef DL As Complex, ByRef D As Complex, _
    ByRef DU As Complex, ByRef DLF As Complex, ByRef DF As Complex, _
    ByRef DUF As Complex, ByRef DU2 As Complex, ByRef IPIV As Integer, _
    ByRef B As Complex, ByRef LDB As Integer, ByRef X As Complex, _
    ByRef LDX As Integer, ByRef RCOND As Double, ByRef FERR As Double, _
    ByRef BERR As Double, ByRef WORK As Complex, ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07CPF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef DL As Complex, ByRef D As Complex, _
    ByRef DU As Complex, ByRef DLF As Complex, ByRef DF As Complex, _
    ByRef DUF As Complex, ByRef DU2 As Complex, ByRef IPIV As Integer, _
    ByRef B As Complex, ByRef LDB As Integer, ByRef X As Complex, _
    ByRef LDX As Integer, ByRef RCOND As Double, ByRef FERR As Double, _
    ByRef BERR As Double, ByRef WORK As Complex, ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGTTRF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef DL As Complex, _
    ByRef D As Complex, _
    ByRef DU As Complex, _
    ByRef DU2 As Complex, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07CRF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef DL As Complex, _
    ByRef D As Complex, _
    ByRef DU As Complex, _
    ByRef DU2 As Complex, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGTTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef DL As Complex, _
    ByRef D As Complex, _
    ByRef DU As Complex, _
    ByRef DU2 As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07CSF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef DL As Complex, _
    ByRef D As Complex, _
    ByRef DU As Complex, _
    ByRef DU2 As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGTCON Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef DL As Complex, _
    ByRef D As Complex, _
    ByRef DU As Complex, _
    ByRef DU2 As Complex, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )

   Declare Sub F07CUF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByRef N As Integer, _
    ByRef DL As Complex, _
    ByRef D As Complex, _
    ByRef DU As Complex, _
    ByRef DU2 As Complex, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGTRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, ByRef NRHS As Integer, _
    ByRef DL As Complex, ByRef D As Complex, ByRef DU As Complex, _
    ByRef DLF As Complex, ByRef DF As Complex, ByRef DUF As Complex, _
    ByRef DU2 As Complex, ByRef IPIV As Integer, ByRef B As Complex, _
    ByRef LDB As Integer, ByRef X As Complex, ByRef LDX As Integer, _
    ByRef FERR As Double, ByRef BERR As Double, ByRef WORK As Complex, _
    ByRef RWORK As Double, ByRef INFO As Integer _
   )

   Declare Sub F07CVF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, ByRef N As Integer, ByRef NRHS As Integer, _
    ByRef DL As Complex, ByRef D As Complex, ByRef DU As Complex, _
    ByRef DLF As Complex, ByRef DF As Complex, ByRef DUF As Complex, _
    ByRef DU2 As Complex, ByRef IPIV As Integer, ByRef B As Complex, _
    ByRef LDB As Integer, ByRef X As Complex, ByRef LDX As Integer, _
    ByRef FERR As Double, ByRef BERR As Double, ByRef WORK As Complex, _
    ByRef RWORK As Double, ByRef INFO As Integer _
   )


   Declare Sub DPOSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07FAF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPOSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef A As Double, ByRef LDA As Integer, _
    ByRef AF As Double, ByRef LDAF As Integer, ByVal EQUED As string, ByVal EQUEDLength As Integer, _
    ByRef S As Double, ByRef B As Double, ByRef LDB As Integer, _
    ByRef X As Double, ByRef LDX As Integer, ByRef RCOND As Double, _
    ByRef FERR As Double, ByRef BERR As Double, ByRef WORK As Double, _
    ByRef IWORK As Integer, ByRef INFO As Integer _
   )

   Declare Sub F07FBF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef A As Double, ByRef LDA As Integer, _
    ByRef AF As Double, ByRef LDAF As Integer, ByVal EQUED As string, ByVal EQUEDLength As Integer, _
    ByRef S As Double, ByRef B As Double, ByRef LDB As Integer, _
    ByRef X As Double, ByRef LDX As Integer, ByRef RCOND As Double, _
    ByRef FERR As Double, ByRef BERR As Double, ByRef WORK As Double, _
    ByRef IWORK As Integer, ByRef INFO As Integer _
   )


   Declare Sub DPOTRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07FDF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPOTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07FEF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPOEQU Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef S As Double, _
    ByRef SCOND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07FFF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef S As Double, _
    ByRef SCOND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub DPOCON Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07FGF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPORFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef AF As Double, _
    ByRef LDAF As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07FHF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef AF As Double, _
    ByRef LDAF As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPOTRI Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07FJF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPOSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07FNF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPOSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef A As Complex, ByRef LDA As Integer, _
    ByRef AF As Complex, ByRef LDAF As Integer, ByVal EQUED As string, ByVal EQUEDLength As Integer, _
    ByRef S As Double, ByRef B As Complex, ByRef LDB As Integer, _
    ByRef X As Complex, ByRef LDX As Integer, ByRef RCOND As Double, _
    ByRef FERR As Double, ByRef BERR As Double, ByRef WORK As Complex, _
    ByRef RWORK As Double, ByRef INFO As Integer _
   )

   Declare Sub F07FPF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef A As Complex, ByRef LDA As Integer, _
    ByRef AF As Complex, ByRef LDAF As Integer, ByVal EQUED As string, ByVal EQUEDLength As Integer, _
    ByRef S As Double, ByRef B As Complex, ByRef LDB As Integer, _
    ByRef X As Complex, ByRef LDX As Integer, ByRef RCOND As Double, _
    ByRef FERR As Double, ByRef BERR As Double, ByRef WORK As Complex, _
    ByRef RWORK As Double, ByRef INFO As Integer _
   )


   Declare Sub ZPOTRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07FRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPOTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07FSF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPOEQU Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef S As Double, _
    ByRef SCOND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07FTF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef S As Double, _
    ByRef SCOND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPOCON Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07FUF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPORFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef AF As Complex, _
    ByRef LDAF As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07FVF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef AF As Complex, _
    ByRef LDAF As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPOTRI Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07FWF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPPSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GAF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPPSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef AFP As Double, _
    ByVal EQUED As string, ByVal EQUEDLength As Integer, _
    ByRef S As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef RCOND As Double, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GBF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef AFP As Double, _
    ByVal EQUED As string, ByVal EQUEDLength As Integer, _
    ByRef S As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef RCOND As Double, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPPTRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GDF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub DPPTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GEF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPPEQU Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef S As Double, _
    ByRef SCOND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GFF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef S As Double, _
    ByRef SCOND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub DPPCON Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GGF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPPRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef AFP As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GHF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef AFP As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPPTRI Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GJF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPPSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GNF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPPSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef AFP As Complex, _
    ByVal EQUED As string, ByVal EQUEDLength As Integer, _
    ByRef S As Double, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef RCOND As Double, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GPF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef AFP As Complex, _
    ByVal EQUED As string, ByVal EQUEDLength As Integer, _
    ByRef S As Double, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef RCOND As Double, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPPTRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPPTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GSF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPPEQU Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef S As Double, _
    ByRef SCOND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GTF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef S As Double, _
    ByRef SCOND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPPCON Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GUF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPPRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef AFP As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GVF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef AFP As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPPTRI Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef INFO As Integer _
   )

   Declare Sub F07GWF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef INFO As Integer _
   )


   Declare Sub DPBSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07HAF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPBSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, ByRef N As Integer, _
    ByRef KD As Integer, ByRef NRHS As Integer, ByRef AB As Double, _
    ByRef LDAB As Integer, ByRef AFB As Double, ByRef LDAFB As Integer, _
    ByVal EQUED As string, ByVal EQUEDLength As Integer, ByRef S As Double, ByRef B As Double, _
    ByRef LDB As Integer, ByRef X As Double, ByRef LDX As Integer, _
    ByRef RCOND As Double, ByRef FERR As Double, ByRef BERR As Double, _
    ByRef WORK As Double, ByRef IWORK As Integer, ByRef INFO As Integer _
   )

   Declare Sub F07HBF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, ByRef N As Integer, _
    ByRef KD As Integer, ByRef NRHS As Integer, ByRef AB As Double, _
    ByRef LDAB As Integer, ByRef AFB As Double, ByRef LDAFB As Integer, _
    ByVal EQUED As string, ByVal EQUEDLength As Integer, ByRef S As Double, ByRef B As Double, _
    ByRef LDB As Integer, ByRef X As Double, ByRef LDX As Integer, _
    ByRef RCOND As Double, ByRef FERR As Double, ByRef BERR As Double, _
    ByRef WORK As Double, ByRef IWORK As Integer, ByRef INFO As Integer _
   )


   Declare Sub DPBTRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07HDF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPBTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07HEF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPBEQU Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef S As Double, _
    ByRef SCOND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07HFF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef S As Double, _
    ByRef SCOND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub DPBCON Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07HGF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPBRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef AFB As Double, _
    ByRef LDAFB As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07HHF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef AFB As Double, _
    ByRef LDAFB As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPBSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07HNF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPBSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, ByRef N As Integer, _
    ByRef KD As Integer, ByRef NRHS As Integer, ByRef AB As Complex, _
    ByRef LDAB As Integer, ByRef AFB As Complex, ByRef LDAFB As Integer, _
    ByVal EQUED As string, ByVal EQUEDLength As Integer, ByRef S As Double, ByRef B As Complex, _
    ByRef LDB As Integer, ByRef X As Complex, ByRef LDX As Integer, _
    ByRef RCOND As Double, ByRef FERR As Double, ByRef BERR As Double, _
    ByRef WORK As Complex, ByRef RWORK As Double, ByRef INFO As Integer _
   )

   Declare Sub F07HPF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, ByRef N As Integer, _
    ByRef KD As Integer, ByRef NRHS As Integer, ByRef AB As Complex, _
    ByRef LDAB As Integer, ByRef AFB As Complex, ByRef LDAFB As Integer, _
    ByVal EQUED As string, ByVal EQUEDLength As Integer, ByRef S As Double, ByRef B As Complex, _
    ByRef LDB As Integer, ByRef X As Complex, ByRef LDX As Integer, _
    ByRef RCOND As Double, ByRef FERR As Double, ByRef BERR As Double, _
    ByRef WORK As Complex, ByRef RWORK As Double, ByRef INFO As Integer _
   )


   Declare Sub ZPBTRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07HRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPBTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07HSF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPBEQU Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef S As Double, _
    ByRef SCOND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07HTF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef S As Double, _
    ByRef SCOND As Double, _
    ByRef AMAX As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPBCON Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07HUF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPBRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef AFB As Complex, _
    ByRef LDAFB As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07HVF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef AFB As Complex, _
    ByRef LDAFB As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub DPTSV Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07JAF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPTSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef DF As Double, _
    ByRef EF As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef RCOND As Double, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07JBF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef DF As Double, _
    ByRef EF As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef RCOND As Double, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub DPTTRF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07JDF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub DPTTRS Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07JEF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DPTCON Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07JGF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub DPTRFS Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef DF As Double, _
    ByRef EF As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07JHF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Double, _
    ByRef DF As Double, _
    ByRef EF As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPTSV Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07JNF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPTSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Complex, _
    ByRef DF As Double, _
    ByRef EF As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef RCOND As Double, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07JPF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Complex, _
    ByRef DF As Double, _
    ByRef EF As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef RCOND As Double, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPTTRF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef D As Double, _
    ByRef E As Complex, _
    ByRef INFO As Integer _
   )

   Declare Sub F07JRF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef D As Double, _
    ByRef E As Complex, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPTTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07JSF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPTCON Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef D As Double, _
    ByRef E As Complex, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07JUF Lib "FLDLL224M_nag.dll" ( _
    ByRef N As Integer, _
    ByRef D As Double, _
    ByRef E As Complex, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZPTRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Complex, _
    ByRef DF As Double, _
    ByRef EF As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07JVF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef D As Double, _
    ByRef E As Complex, _
    ByRef DF As Double, _
    ByRef EF As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub DSYSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07MAF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DSYSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef A As Double, ByRef LDA As Integer, _
    ByRef AF As Double, ByRef LDAF As Integer, ByRef IPIV As Integer, _
    ByRef B As Double, ByRef LDB As Integer, ByRef X As Double, _
    ByRef LDX As Integer, ByRef RCOND As Double, ByRef FERR As Double, _
    ByRef BERR As Double, ByRef WORK As Double, ByRef LWORK As Integer, _
    ByRef IWORK As Integer, ByRef INFO As Integer _
   )

   Declare Sub F07MBF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef A As Double, ByRef LDA As Integer, _
    ByRef AF As Double, ByRef LDAF As Integer, ByRef IPIV As Integer, _
    ByRef B As Double, ByRef LDB As Integer, ByRef X As Double, _
    ByRef LDX As Integer, ByRef RCOND As Double, ByRef FERR As Double, _
    ByRef BERR As Double, ByRef WORK As Double, ByRef LWORK As Integer, _
    ByRef IWORK As Integer, ByRef INFO As Integer _
   )


   Declare Sub DSYTRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07MDF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DSYTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07MEF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DSYCON Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07MGF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DSYRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef AF As Double, _
    ByRef LDAF As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07MHF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef AF As Double, _
    ByRef LDAF As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DSYTRI Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07MJF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZHESV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07MNF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZHESVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef A As Complex, ByRef LDA As Integer, _
    ByRef AF As Complex, ByRef LDAF As Integer, ByRef IPIV As Integer, _
    ByRef B As Complex, ByRef LDB As Integer, ByRef X As Complex, _
    ByRef LDX As Integer, ByRef RCOND As Double, ByRef FERR As Double, _
    ByRef BERR As Double, ByRef WORK As Complex, ByRef LWORK As Integer, _
    ByRef RWORK As Double, ByRef INFO As Integer _
   )

   Declare Sub F07MPF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef A As Complex, ByRef LDA As Integer, _
    ByRef AF As Complex, ByRef LDAF As Integer, ByRef IPIV As Integer, _
    ByRef B As Complex, ByRef LDB As Integer, ByRef X As Complex, _
    ByRef LDX As Integer, ByRef RCOND As Double, ByRef FERR As Double, _
    ByRef BERR As Double, ByRef WORK As Complex, ByRef LWORK As Integer, _
    ByRef RWORK As Double, ByRef INFO As Integer _
   )


   Declare Sub ZHETRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07MRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZHETRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07MSF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZHECON Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )

   Declare Sub F07MUF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )


   Declare Sub ZHERFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef AF As Complex, _
    ByRef LDAF As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07MVF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef AF As Complex, _
    ByRef LDAF As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZHETRI Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )

   Declare Sub F07MWF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )


   Declare Sub ZSYSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07NNF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZSYSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef A As Complex, ByRef LDA As Integer, _
    ByRef AF As Complex, ByRef LDAF As Integer, ByRef IPIV As Integer, _
    ByRef B As Complex, ByRef LDB As Integer, ByRef X As Complex, _
    ByRef LDX As Integer, ByRef RCOND As Double, ByRef FERR As Double, _
    ByRef BERR As Double, ByRef WORK As Complex, ByRef LWORK As Integer, _
    ByRef RWORK As Double, ByRef INFO As Integer _
   )

   Declare Sub F07NPF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, ByVal UPLO As string, ByVal UPLOLength As Integer, ByRef N As Integer, _
    ByRef NRHS As Integer, ByRef A As Complex, ByRef LDA As Integer, _
    ByRef AF As Complex, ByRef LDAF As Integer, ByRef IPIV As Integer, _
    ByRef B As Complex, ByRef LDB As Integer, ByRef X As Complex, _
    ByRef LDX As Integer, ByRef RCOND As Double, ByRef FERR As Double, _
    ByRef BERR As Double, ByRef WORK As Complex, ByRef LWORK As Integer, _
    ByRef RWORK As Double, ByRef INFO As Integer _
   )


   Declare Sub ZSYTRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07NRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZSYTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07NSF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZSYCON Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )

   Declare Sub F07NUF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )


   Declare Sub ZSYRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef AF As Complex, _
    ByRef LDAF As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07NVF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef AF As Complex, _
    ByRef LDAF As Integer, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZSYTRI Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )

   Declare Sub F07NWF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef IPIV As Integer, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )


   Declare Sub DSPSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07PAF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DSPSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef AFP As Double, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef RCOND As Double, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07PBF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef AFP As Double, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef RCOND As Double, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DSPTRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07PDF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DSPTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07PEF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DSPCON Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07PGF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DSPRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef AFP As Double, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07PHF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef AFP As Double, _
    ByRef IPIV As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DSPTRI Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef IPIV As Integer, _
    ByRef WORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07PJF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef IPIV As Integer, _
    ByRef WORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZHPSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07PNF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZHPSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef AFP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef RCOND As Double, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07PPF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef AFP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef RCOND As Double, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZHPTRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07PRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZHPTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07PSF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZHPCON Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )

   Declare Sub F07PUF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )


   Declare Sub ZHPRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef AFP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07PVF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef AFP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZHPTRI Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )

   Declare Sub F07PWF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )


   Declare Sub ZSPSV Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07QNF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZSPSVX Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef AFP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef RCOND As Double, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07QPF Lib "FLDLL224M_nag.dll" ( _
    ByVal FACT As string, ByVal FACTLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef AFP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef RCOND As Double, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZSPTRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07QRF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZSPTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07QSF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZSPCON Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )

   Declare Sub F07QUF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef ANORM As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )


   Declare Sub ZSPRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef AFP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07QVF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef AFP As Complex, _
    ByRef IPIV As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZSPTRI Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )

   Declare Sub F07QWF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef IPIV As Integer, _
    ByRef WORK As Complex, _
    ByRef INFO As Integer _
   )


   Declare Sub DTRTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07TEF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DTRCON Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07TGF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DTRRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07THF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DTRTRI Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07TJF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZTRTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07TSF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZTRCON Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07TUF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZTRRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07TVF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZTRTRI Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07TWF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DTPTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07UEF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DTPCON Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07UGF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DTPRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07UHF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Double, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DTPTRI Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07UJF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZTPTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07USF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZTPCON Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07UUF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZTPRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07UVF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef AP As Complex, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZTPTRI Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef INFO As Integer _
   )

   Declare Sub F07UWF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef AP As Complex, _
    ByRef INFO As Integer _
   )


   Declare Sub DTBTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07VEF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DTBCON Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07VGF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef RCOND As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DTBRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07VHF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Double, _
    ByRef LDAB As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef X As Double, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Double, _
    ByRef IWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZTBTRS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F07VSF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZTBCON Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07VUF Lib "FLDLL224M_nag.dll" ( _
    ByVal NORM As string, ByVal NORMLength As Integer, _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef RCOND As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZTBRFS Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F07VVF Lib "FLDLL224M_nag.dll" ( _
    ByVal UPLO As string, ByVal UPLOLength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByVal DIAG As string, ByVal DIAGLength As Integer, _
    ByRef N As Integer, _
    ByRef KD As Integer, _
    ByRef NRHS As Integer, _
    ByRef AB As Complex, _
    ByRef LDAB As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef X As Complex, _
    ByRef LDX As Integer, _
    ByRef FERR As Double, _
    ByRef BERR As Double, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub DGELS Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08AAF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGEQRF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08AEF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DORGQR Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08AFF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DORMQR Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08AGF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGELQF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08AHF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DORGLQ Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08AJF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DORMLQ Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08AKF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGELS Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08ANF Lib "FLDLL224M_nag.dll" ( _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGEQRF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08ASF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZUNGQR Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08ATF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZUNMQR Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08AUF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGELQF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08AVF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZUNGLQ Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08AWF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZUNMLQ Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08AXF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGELSY Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef JPVT As Integer, _
    ByRef RCOND As Double, _
    ByRef RANK As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08BAF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef B As Double, _
    ByRef LDB As Integer, _
    ByRef JPVT As Integer, _
    ByRef RCOND As Double, _
    ByRef RANK As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGEQPF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef JPVT As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F08BEF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef JPVT As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub DGEQP3 Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef JPVT As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08BFF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef JPVT As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DTZRZF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08BHF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DORMRZ Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef L As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08BKF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef L As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGELSY Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef JPVT As Integer, _
    ByRef RCOND As Double, _
    ByRef RANK As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F08BNF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef NRHS As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef B As Complex, _
    ByRef LDB As Integer, _
    ByRef JPVT As Integer, _
    ByRef RCOND As Double, _
    ByRef RANK As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGEQPF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef JPVT As Integer, _
    ByRef TAU As Complex, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F08BSF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef JPVT As Integer, _
    ByRef TAU As Complex, _
    ByRef WORK As Complex, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZGEQP3 Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef JPVT As Integer, _
    ByRef TAU As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )

   Declare Sub F08BTF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef JPVT As Integer, _
    ByRef TAU As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef RWORK As Double, _
    ByRef INFO As Integer _
   )


   Declare Sub ZTZRZF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08BVF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub ZUNMRZ Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef L As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08BXF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef L As Integer, _
    ByRef A As Complex, _
    ByRef LDA As Integer, _
    ByRef TAU As Complex, _
    ByRef C As Complex, _
    ByRef LDC As Integer, _
    ByRef WORK As Complex, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DGEQLF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08CEF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DORGQL Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08CFF Lib "FLDLL224M_nag.dll" ( _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )


   Declare Sub DORMQL Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef C As Double, _
    ByRef LDC As Integer, _
    ByRef WORK As Double, _
    ByRef LWORK As Integer, _
    ByRef INFO As Integer _
   )

   Declare Sub F08CGF Lib "FLDLL224M_nag.dll" ( _
    ByVal SIDE As string, ByVal SIDELength As Integer, _
    ByVal TRANS As string, ByVal TRANSLength As Integer, _
    ByRef M As Integer, _
    ByRef N As Integer, _
    ByRef K As Integer, _
    ByRef A As Double, _
    ByRef LDA As Integer, _
    ByRef TAU As Double, _
    ByRef C As Double, _
    ByRef LDC As I