A heat propagation computation program