Switzerland resort where 40 people died in ski bar fire set to stage 2038 Winter Olympics