let output_type = ref Tdl