let
destruct obj =
obj >>>
AXOEvents
.get_target >>> get
"value"
>>> as_string