Origin of Foliation in Glaciers