Working version of heat transfer.
Set initial guess for linear solvers (to solution from previous time step)