Imports System
Imports uCalcSoftware
Public Module Program
   Public Sub Main()
      Dim uc As New uCalc()
      Dim t = uc.NewTransformer()
      
      '// Define a variable once during rule initialization
      t.FromTo("init_math", "{@Define: Variable: my_pi = 3.14}Math Initialized")
      t.FromTo("Eval: {expr}", "{@@Eval: expr}")
      Console.WriteLine(t.Transform("init_math"))
      Console.WriteLine(t.Transform("Eval: my_pi * 2"))
   End Sub
End Module