Integrate[UnStp[[x]], {x, 0, 30}]