4 lines
85 B
PostScript
4 lines
85 B
PostScript
/flatten {
|
|
/.f {{type /arraytype eq} {{.f} map aload pop} ift}.
|
|
[exch .f]
|
|
}.
|