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