RosettaCodeData/Task/Flatten-a-list/Bracmat/flatten-a-list.bracmat
2015-11-18 06:14:39 +00:00

7 lines
204 B
Text

( (myList = ((1), 2, ((3,4), 5), ((())), (((6))), 7, 8, ()))
& put$("Unevaluated:")
& lst$myList
& !myList:?myList { the expression !myList evaluates myList }
& put$("Flattened:")
& lst$myList
)