let get_restricted_ext_pre_bc ref_stmt = let global_loop_inv = get_global_loop_inv ref_stmt in force_condition_to_predicate global_loop_inv (Spec_tools.pre_flattening (Data_for_aorai.get_loop_ext_pre_bycase ref_stmt))