open System
type Node = Value * Value
and Value = Pair of Node | I of int | S of string | Void
let n1: Node = (I(42), Void)
let n2: Node = (S("Hello"), Pair(I(42), S("Hello")))
b3BlbiBTeXN0ZW0KCnR5cGUgTm9kZSAgPSBWYWx1ZSAqIFZhbHVlCiBhbmQgVmFsdWUgPSBQYWlyIG9mIE5vZGUgfCBJIG9mIGludCB8IFMgb2Ygc3RyaW5nIHwgVm9pZAoKbGV0IG4xOiBOb2RlID0gKEkoNDIpLCBWb2lkKQpsZXQgbjI6IE5vZGUgPSAoUygiSGVsbG8iKSwgUGFpcihJKDQyKSwgUygiSGVsbG8iKSkpCg==