Statistical mechanical model of gas adsorption in porous crystals with dynamic moieties