Mathematical Model of Bone Regeneration in a Porous Implant