Added monte_simul function