proc {SwapCells A B}
     B := A := @B
  end