Anonymous user
Atomic updates: Difference between revisions
m
→{{header|Mathematica}}
Line 2,482:
</lang>
=={{header|Mathematica}} / {{header|Wolfram Language}}==
<lang Mathematica>transfer[bucks_, src_, dest_, n_] :=
ReplacePart[
|