1val quietdec = ref true; 2val printDepth = ref 0; 3val printLength = ref 0; 4 5fun compile_theory () = (); 6