set-zero! updated.