Imports System
Imports uCalcSoftware
Public Module Program
   Public Sub Main()
      Dim uc As New uCalc()
      '// See uCalc.Tokens.Count() example for list of token names
      
      Dim t = uc.NewTransformer()
      Dim MyToken = t.Tokens.Add("###")
      Dim Alpha = t.Tokens("_token_alphanumeric")
      
      Console.WriteLine(MyToken.TypeOfToken = TokenType.AlphaNumeric)
      Console.WriteLine(MyToken.TypeOfToken = TokenType.Generic)
      Console.WriteLine(Alpha.TypeOfToken = TokenType.AlphaNumeric)
      Console.WriteLine(Alpha.TypeOfToken = TokenType.Generic)
      
      
   End Sub
End Module