Simulation for high Weissenberg number: Viscoelastic flow by a finite element method