procedure simple() write("simple: Starting...") suspend 3 write("simple: Continuing...") suspend 7 write("simple: Done...") end