Modifications for ab initio calculations of the moderately large-embedded-cluster model. Hydrogen adsorption on a lithium surface