Population genetics simulation 4

N = 1000, initial p[A] = 0.5,
relative fitness: AA = 1.0, Aa = 1.0, aa = 0.9
migration = 0.0