type test = T of int * float * string let x = 1, 1.0, "hello" let y = T x