f := proc()
    global c;
    c := 3;
    print("a is "||a);
    print("c is "||c);
end proc:
f();
print("c is "||c);
                            "a is 1"
                            "c is 3"
                            "c is 3"