MODULE ModA; VAR x : INTEGER; BEGIN x := 1 END ModB.