let
key_cp_wrapper =
{
to_raw = key_to_value ;
of_raw = value_to_key ;
}