take f ; :: thesis: ex c being Element of SCM+FSA-Data-Loc ex f being Element of SCM+FSA-Data*-Loc st
( <*c,f*> = x `2 & f = f )

take c ; :: thesis: ex f being Element of SCM+FSA-Data*-Loc st
( <*c,f*> = x `2 & f = f )

take f ; :: thesis: ( <*c,f*> = x `2 & f = f )
thus ( <*c,f*> = x `2 & f = f ) by A1, MCART_1:7; :: thesis: verum