CicCooking.init () ;
Logger.log_callback :=
(Logger.log_to_html
- ~print_and_flush:(function s -> print_string s ; flush stdout)) ;
+ ~print_and_flush:(function s -> () (* print_string s ; flush stdout *) ));
Mqint.set_stat false;
Gen.set_log_file "MQGenLog.htm";
set_dbms 1;