Mathematical model of an electric smelting furnace