Imports System
Imports uCalcSoftware
Public Module Program
   Public Sub Main()
      Dim uc As New uCalc()
      Dim t As New uCalc.Transformer()
      
      '// The variable {formula} will capture the literal text "10 * (5-2)".
      '// {@@Eval} then executes that text as an expression.
      t.FromTo("solve({formula})", "'{formula}' is {@@Eval: formula}.")
      
      Dim text = "The answer to solve(10 * (5-2))"
      Console.WriteLine(t.Transform(text))
   End Sub
End Module