A finite element code for prediction of the response of viscoelastic materials