let key_cp_wrapper = Configwin_types.key_cp_wrapper