string s, a;
s := "hello";
a := s;
s := s & " world";
message s;  % writes "hello world"
message a;  % writes "hello"
end