Imports System
Imports uCalcSoftware
Public Module Program
   Public Sub Main()
      Dim uc As New uCalc()
      Dim infix_minus = uc.ItemOf("-", uCalc.Properties(ItemIs.Infix))
      Dim prefix_minus = uc.ItemOf("-", uCalc.Properties(ItemIs.Prefix))
      
      Console.WriteLine($"Operands for infix '-': {infix_minus.Count}")
      Console.WriteLine($"Operands for prefix '-': {prefix_minus.Count}")
   End Sub
End Module