let
rule_to_value (ft, rule) =
O
.
Raw
.
Tuple
[
O
.
Raw
.
String
ft ;
O
.
Raw
.
String
rule ;
]