RosettaCodeData/Task/Hash-from-two-arrays/PostScript/hash-from-two-arrays.ps

7 lines
159 B
PostScript

% push our arrays
[/a /b /c /d /e] [1 2 3 4 5]
% create a dict with it
{aload pop} dip let currentdict end
% show that we have created the hash
{= =} forall