(** to use the owned tables *)
let ownerize_tables owner =
sort_tbl_real := ( sort_tbl_original ^ "_" ^ owner) ;
rel_tbl_real := ( rel_tbl_original ^ "_" ^ owner) ;
obj_tbl_real := ( obj_tbl_original ^ "_" ^ owner) ;
(** to use the owned tables *)
let ownerize_tables owner =
sort_tbl_real := ( sort_tbl_original ^ "_" ^ owner) ;
rel_tbl_real := ( rel_tbl_original ^ "_" ^ owner) ;
obj_tbl_real := ( obj_tbl_original ^ "_" ^ owner) ;