R [*] is_transitive_in field R by Lm31;
then R [*] is_transitive_in field (R [*]) by Lm34;
hence for b1 being Relation st b1 = R [*] holds
b1 is transitive by RELAT_2:def 16; :: thesis: verum