Modeling ice-crystal fabric as a proxy for ice-stream stability