Ice-shelf collapse from subsurface warming as a trigger for Heinrich events