ask=n
#$b090
STEADY=F; LSTEP=5; NX=5; NY=5; NZ=5; TLAST=0.1; gama=1.4; open=f
#$b091
text(expanding closed 3D box)
SPEDAT(SET,GXMONI,TRANSIENT,L,F)