Main
SET a=7,b=8,c=9,d=10
WRITE !,"Before NEW:",!,"a=",a,!,"b=",b,!,"c=",c,!,"d=",d
DO Sub1
WRITE !,"Returned to prior context:"
WRITE !,"a=",a,!,"b=",b,!,"c=",c,!,"d=",d
QUIT
Sub1
NEW d,e
SET d="big number"
WRITE !,"After NEW:",!,"a=",a,!,"b=",b,!,"c=",c,!,"d=",d
QUIT
USER>SET a=7,b=8,c=9,d=10
USER>WRITE
a=7
b=8
c=9
d=10
USER>NEW (a,c)
USER 1S1>WRITE
a=7
c=9
USER 1S1>QUIT
USER>WRITE
a=7
b=8
c=9
d=10
USER>