monte.c second version