[logic-ml] dinatural transformations