A Finite Element Implementation of a Fully Coupled Mechanical–Chemical Theory