Imports System
Imports uCalcSoftware
Public Module Program
   Public Sub Main()
      Dim uc As New uCalc()
      Dim t As New uCalc.Transformer()
      Dim myRule = t.FromTo("A", "B")
      
      '// Get the parent from the rule
      Dim parent = myRule.ParentTransformer
      
      '// Check if the parent is the original transformer using its unique memory index
      Console.WriteLine(parent.MemoryIndex = t.MemoryIndex)
   End Sub
End Module