Public Class Plugin
    Implements IPluginMathNumericEvaluation

    Private _terms As TermInfo()
    
    Private _description As Dictionary(Of String, String) = New Dictionary(Of String, String) From {
        {"ENG", "test function."},
        {"RUS", "функция тестирования."}
    }

    Public Function GetTermsHandled(sessionProfile As SessionProfile) As TermInfo() Implements IPluginHandleEvaluation.GetTermsHandled        
        Return _terms
    End Function

    Public Sub Initialize() Implements IPlugin.Initialize
    
        _terms = {New TermInfo("test", TermType.[Function], _description("ENG"), FunctionSections.Unknown, True) }
            
    End Sub

    Public Function NumericEvaluation(value As Term, args As TNumber(), ByRef result As TNumber) As Boolean Implements IPluginMathNumericEvaluation.NumericEvaluation
        
        result = args(0) * ( new TDouble("'sec") )
                
        Return True
        
    End Function

    Public Sub Dispose() Implements IDisposable.Dispose
    End Sub
End Class