R [*] is_reflexive_in field R by Lm37;
then R [*] is_reflexive_in field (R [*]) by Lm34;
hence for b1 being Relation st b1 = R [*] holds
b1 is reflexive by RELAT_2:def 9; :: thesis: verum