Design and optimization of induction heating for tungsten heavy alloy prior to rotary swaging