fork download
  1. open System
  2.  
  3. type Node = Value * Value
  4. and Value = Pair of Node | I of int | S of string | Void
  5.  
  6. let n1: Node = (I(42), Void)
  7. let n2: Node = (S("Hello"), Pair(I(42), S("Hello")))
  8.  
Success #stdin #stdout 0.01s 23936KB
stdin
Standard input is empty
stdout
Standard output is empty