Discrete particle simulation of gas-solid flow in a blast furnace