Numerical computation of sapphire crystal growth using heat exchanger method