RosettaCodeData/Task/Generic-swap/Modula-3/generic-swap-5.mod3

MODULE Main;

IMPORT IntSwap, IO, Fmt;

VAR left := 10;
    right := 20;

BEGIN
  IO.Put("Left = " & Fmt.Int(left) & "\n");
  IntSwap.Swap(left, right);
  IO.Put("Left = " & Fmt.Int(left) & "\n");
END Main.