Imports System
Imports uCalcSoftware
Public Module Program
   Public Sub Main()
      Dim uc As New uCalc()
      Dim text = "The value is x"
      
      '// 1. Setup Debug Transformer
      Dim t_debug As New uCalc.Transformer()
      t_debug.Description = "Debug Transformer (Verbose)"
      t_debug.FromTo("x", "100 // debug value")
      
      '// 2. Setup Production Transformer
      Dim t_prod As New uCalc.Transformer()
      t_prod.Description = "Production Transformer (Clean)"
      t_prod.FromTo("x", "100")
      
      Console.WriteLine($"{t_debug.Description}: {t_debug.Transform(text)}")
      Console.WriteLine($"{t_prod.Description}: {t_prod.Transform(text)}")
   End Sub
End Module