A simple magma-driven thermal balance model for the formation of volcanogenic massive sulphides