:: deftheorem Def2 defines RightComp GOBOARD9:def 2 :
for f being non constant standard special_circular_sequence
for b2 being Subset of (TOP-REAL 2) holds
( b2 = RightComp f iff ( b2 is_a_component_of (L~ f) ` & Int (right_cell (f,1)) c= b2 ) );