6 lines
75 B
Text
6 lines
75 B
Text
proc {SwapCells A B}
|
|
Tmp = @A
|
|
in
|
|
A := @B
|
|
B := Tmp
|
|
end
|