Ab initio quantum chemical calculation as a tool of evaluating diamagnetic susceptibility of magnetically levitating substances