Simulation of the Stern Gerlach experiment