Imports System
Imports uCalcSoftware
Public Module Program
   Public Sub Main()
      Dim uc As New uCalc()
      Dim t As New uCalc.Transformer()
      '// Normalize 'true-like' and 'false-like' values
      t.FromTo("{ True | Yes | On }", "TRUE")
      t.FromTo("{ False | No | Off }", "FALSE")
      
      Console.WriteLine(t.Transform("System is On and Power is False"))
      Console.WriteLine(t.Transform("Access: Yes, Admin: No"))
   End Sub
End Module