Imports System
Imports uCalcSoftware
Public Module Program
   Public Sub Main()
      Dim uc As New uCalc()
      Dim t = uc.NewTransformer()
      '// Normalize "True/Yes/On" to "TRUE" and "False/No/Off" to "FALSE"
      t.FromTo("{ True | Yes | On }", "TRUE")
      t.FromTo("{ False | No | Off }", "FALSE")
      
      Console.WriteLine(t.Transform("System is On"))    '// Output: System is TRUE
      Console.WriteLine(t.Transform("Power is False"))  '// Output: Power is FALSE
   End Sub
End Module