Virial theorem in the density-functional formalism: Forces in H/sub 2/