:: deftheorem defprfp defines Polynom-Ring RING_4:def 8 :
for F being Field
for p being non constant Element of the carrier of (Polynom-Ring F)
for b3 being strict doubleLoopStr holds
( b3 = Polynom-Ring p iff ( the carrier of b3 = { q where q is Polynomial of F : deg q < deg p } & the addF of b3 = the addF of (Polynom-Ring F) || the carrier of b3 & the multF of b3 = (poly_mult_mod p) || the carrier of b3 & the OneF of b3 = 1_. F & the ZeroF of b3 = 0_. F ) );