Flow-induced anisotropy in polar ice and related ice-sheet flow modelling