A method of computation of the pressure effect on melt viscosity