A Finite Element Procedure for Analysis of Metal Forming Processes