let debug_mode v = Trakeva_postgresql.debug := v