Declare Sub S30AAF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByRef m As Long, _
     ByRef n As Long, _
     ByRef X As Double, _
     ByRef s As Double, _
     ByRef t As Double, _
     ByRef sigma As Double, _
     ByRef r As Double, _
     ByRef q As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef ifail As Long)

   Declare Sub S30ABF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByRef m As Long, _
     ByRef n As Long, _
     ByRef X As Double, _
     ByRef s As Double, _
     ByRef t As Double, _
     ByRef sigma As Double, _
     ByRef r As Double, _
     ByRef q As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef delta As Double, _
     ByRef gamma As Double, _
     ByRef vega As Double, _
     ByRef theta As Double, _
     ByRef rho As Double, _
     ByRef crho As Double, _
     ByRef vanna As Double, _
     ByRef charm As Double, _
     ByRef speed As Double, _
     ByRef colour As Double, _
     ByRef zomma As Double, _
     ByRef vomma As Double, _
     ByRef ifail As Long)

   Declare Sub S30BAF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByRef m As Long, _
     ByRef n As Long, _
     ByRef SM As Double, _
     ByRef s As Double, _
     ByRef t As Double, _
     ByRef sigma As Double, _
     ByRef r As Double, _
     ByRef q As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef ifail As Long)

   Declare Sub S30BBF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByRef m As Long, _
     ByRef n As Long, _
     ByRef SM As Double, _
     ByRef s As Double, _
     ByRef t As Double, _
     ByRef sigma As Double, _
     ByRef r As Double, _
     ByRef q As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef delta As Double, _
     ByRef gamma As Double, _
     ByRef vega As Double, _
     ByRef theta As Double, _
     ByRef rho As Double, _
     ByRef crho As Double, _
     ByRef vanna As Double, _
     ByRef charm As Double, _
     ByRef speed As Double, _
     ByRef colour As Double, _
     ByRef zomma As Double, _
     ByRef vomma As Double, _
     ByRef ifail As Long)

   Declare Sub S30CAF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByRef m As Long, _
     ByRef n As Long, _
     ByRef X As Double, _
     ByRef s As Double, _
     ByRef k As Double, _
     ByRef t As Double, _
     ByRef sigma As Double, _
     ByRef r As Double, _
     ByRef q As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef ifail As Long)

   Declare Sub S30CBF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByRef m As Long, _
     ByRef n As Long, _
     ByRef X As Double, _
     ByRef s As Double, _
     ByRef k As Double, _
     ByRef t As Double, _
     ByRef sigma As Double, _
     ByRef r As Double, _
     ByRef q As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef delta As Double, _
     ByRef gamma As Double, _
     ByRef vega As Double, _
     ByRef theta As Double, _
     ByRef rho As Double, _
     ByRef crho As Double, _
     ByRef vanna As Double, _
     ByRef charm As Double, _
     ByRef speed As Double, _
     ByRef colour As Double, _
     ByRef zomma As Double, _
     ByRef vomma As Double, ByRef ifail As Long)

   Declare Sub S30CCF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByRef m As Long, _
     ByRef n As Long, _
     ByRef X As Double, _
     ByRef s As Double, _
     ByRef t As Double, _
     ByRef sigma As Double, _
     ByRef r As Double, _
     ByRef q As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef ifail As Long)

   Declare Sub S30CDF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByRef m As Long, _
     ByRef n As Long, _
     ByRef X As Double, _
     ByRef s As Double, _
     ByRef t As Double, _
     ByRef sigma As Double, _
     ByRef r As Double, _
     ByRef q As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef delta As Double, _
     ByRef gamma As Double, _
     ByRef vega As Double, _
     ByRef theta As Double, _
     ByRef rho As Double, _
     ByRef crho As Double, _
     ByRef vanna As Double, _
     ByRef charm As Double, _
     ByRef speed As Double, _
     ByRef colour As Double, _
     ByRef zomma As Double, _
     ByRef vomma As Double, _
     ByRef ifail As Long)



   Declare Sub S30FAF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByVal tTYPE As String, ByVal length_tTYPE As Long, _
     ByRef m As Long, _
     ByRef n As Long, _
     ByRef X As Double, _
     ByRef s As Double, _
     ByRef h As Double, _
     ByRef k As Double, _
     ByRef t As Double, _
     ByRef sigma As Double, _
     ByRef r As Double, _
     ByRef q As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef ifail As Long)


   Declare Sub S30JAF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByRef m As Long, _
     ByRef n As Long, _
     ByRef X As Double, _
     ByRef s As Double, _
     ByRef t As Double, _
     ByRef sigma As Double, _
     ByRef r As Double, _
     ByRef lambda As Long, _
     ByRef jvol As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef ifail As Long)


   Declare Sub S30JBF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByRef m As Long, ByRef n As Long, _
     ByRef X As Double, _
     ByRef s As Double, _
     ByRef t As Double, _
     ByRef sigma As Double, _
     ByRef r As Double, _
     ByRef lambda As Long, _
     ByRef jvol As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef delta As Double, _
     ByRef gamma As Double, _
     ByRef vega As Double, _
     ByRef theta As Double, _
     ByRef rho As Double, _
     ByRef vanna As Double, _
     ByRef charm As Double, _
     ByRef speed As Double, _
     ByRef colour As Double, _
     ByRef zomma As Double, _
     ByRef vomma As Double, ByRef ifail As Long)

'      SUBROUTINE S30NAF(PUT,M,N,X,S,T,SIGMAV,KAPPA,CORR,VAR0,ETA,GAMMA,
'     *                  R,Q,P,LDP,IFAIL)

   Declare Sub S30NAF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByRef m As Long, _
     ByRef n As Long, _
     ByRef X As Double, _
     ByRef s As Double, _
     ByRef t As Double, _
     ByRef sigmav As Double, _
     ByRef kappa As Double, _
     ByRef corr As Double, _
     ByRef var0 As Double, _
     ByRef eta As Double, _
     ByRef gamma As Double, _
     ByRef r As Double, _
     ByRef q As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef ifail As Long)

   Declare Sub S30QCF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByRef m As Long, _
     ByRef n As Long, _
     ByRef X As Double, _
     ByRef s As Double, _
     ByRef t As Double, _
     ByRef sigma As Double, _
     ByRef r As Double, _
     ByRef q As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef ifail As Long)
  
   Declare Sub S30SAF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByRef m As Long, _
     ByRef n As Long, _
     ByRef X As Double, _
     ByRef s As Double, _
     ByRef t As Double, _
     ByRef sigma As Double, _
     ByRef r As Double, _
     ByRef b As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef ifail As Long)

   Declare Sub S30SBF Lib "S30betaFL_LM.dll" ( _
     ByVal tPUT As String, ByVal length_tPUT As Long, _
     ByRef m As Long, _
     ByRef n As Long, _
     ByRef X As Double, _
     ByRef s As Double, _
     ByRef t As Double, _
     ByRef sigma As Double, _
     ByRef r As Double, _
     ByRef b As Double, _
     ByRef p As Double, _
     ByRef LDP As Long, _
     ByRef delta As Double, _
     ByRef gamma As Double, _
     ByRef vega As Double, _
     ByRef theta As Double, _
     ByRef rho As Double, _
     ByRef crho As Double, _
     ByRef vanna As Double, _
     ByRef charm As Double, _
     ByRef speed As Double, _
     ByRef colour As Double, _
     ByRef zomma As Double, _
     ByRef vomma As Double, _
     ByRef ifail As Long)