let get_pred_from_tmpident var = try let (_,_,pred) = (Hashtbl.find !ltl_exps var) in pred with _ -> raise_error ("TMP Variable ("^var^") not declared in hashtbl")