Internal definition of contractive and use it to prove internal_eq_rewrite.

This removes Ralf's hack of using later_car, which is not function in the logic.

Thanks to Aleš for suggesting this.