Numerical Simulation of the Levitation Force of High-Tc Superconductors