edit Storm.R; in progress of cleaning event types