DUP (50) FUNCTION (.5)
Name
Value
NAME
DUP
MUMPS CODE
S %=X,X="" S:X1]"" $P(X,X1,%\$L(X1)+1)=X1,X=$E(X,1,%)
EXPLANATION
DUPLICATES THE 1ST ARGUMENT INTO AN 'N'-BYTE STRING, WHERE 'N' IS 2ND ARGUMENT
