MODULE T; VAR i : INTEGER; r : REAL; BEGIN i := i + r END T.