let
set_reference_frame c rf =
Transform
.set_reference_frame (to_transform c) rf