(left_open_halfline r) ` = right_closed_halfline r by XXREAL_1:224, XXREAL_1:290;
hence halfline r is open ; :: thesis: verum