RosettaCodeData/Task/Flatten-a-list/Standard-ML/flatten-a-list-1.ml
2023-07-01 13:44:08 -04:00

3 lines
87 B
Standard ML

datatype 'a nestedList =
L of 'a (* leaf *)
| N of 'a nestedList list (* node *)