:: deftheorem defrf defines RenField FIELD_5:def 8 :
for F being Field
for Z being set
for r being Renaming of the carrier of F,Z
for b4 being strict doubleLoopStr holds
( b4 = RenField r iff ( the carrier of b4 = rng r & the addF of b4 = ren_add r & the multF of b4 = ren_mult r & the OneF of b4 = r . (1. F) & the ZeroF of b4 = r . (0. F) ) );