getglobal workspace
pushnumber 100
setfield -2 Gravity
emptystack