A discrete Boltzmann equation model for two-phase shallow granular flows