Make the monster wander

This includes work to enclose each world tile in Rc<RefCell<Tile>>.