let C, D be non empty set ; :: thesis: for B being Element of Fin C
for F being BinOp of D
for f, f' being Function of C,D st F is commutative & F is associative & ( B <> {} or F is having_a_unity ) & f | B = f' | B holds
F $$ B,f = F $$ B,f'
let B be Element of Fin C; :: thesis: for F being BinOp of D
for f, f' being Function of C,D st F is commutative & F is associative & ( B <> {} or F is having_a_unity ) & f | B = f' | B holds
F $$ B,f = F $$ B,f'
let F be BinOp of D; :: thesis: for f, f' being Function of C,D st F is commutative & F is associative & ( B <> {} or F is having_a_unity ) & f | B = f' | B holds
F $$ B,f = F $$ B,f'
let f, f' be Function of C,D; :: thesis: ( F is commutative & F is associative & ( B <> {} or F is having_a_unity ) & f | B = f' | B implies F $$ B,f = F $$ B,f' )
assume A1:
( F is commutative & F is associative & ( B <> {} or F is having_a_unity ) )
; :: thesis: ( not f | B = f' | B or F $$ B,f = F $$ B,f' )
set s = id B;
assume
f | B = f' | B
; :: thesis: F $$ B,f = F $$ B,f'
then
( dom (id B) = B & rng (id B) = B & id B is one-to-one & f | B = f' * (id B) )
by RELAT_1:71, RELAT_1:94;
hence
F $$ B,f = F $$ B,f'
by A1, Th7; :: thesis: verum