let A be Universal_Algebra; for f being Function of (dom (signature A)),({0 } * )
for z being Element of {0 } st f = (*--> 0 ) * (signature A) holds
MSSign A = ManySortedSign(# {0 },(dom (signature A)),f,((dom (signature A)) --> z) #)
let f be Function of (dom (signature A)),({0 } * ); for z being Element of {0 } st f = (*--> 0 ) * (signature A) holds
MSSign A = ManySortedSign(# {0 },(dom (signature A)),f,((dom (signature A)) --> z) #)
let z be Element of {0 }; ( f = (*--> 0 ) * (signature A) implies MSSign A = ManySortedSign(# {0 },(dom (signature A)),f,((dom (signature A)) --> z) #) )
A1:
( the carrier' of (MSSign A) = dom (signature A) & the Arity of (MSSign A) = (*--> 0 ) * (signature A) )
by Def13;
( z = 0 & the carrier of (MSSign A) = {0 } )
by Def13, TARSKI:def 1;
hence
( f = (*--> 0 ) * (signature A) implies MSSign A = ManySortedSign(# {0 },(dom (signature A)),f,((dom (signature A)) --> z) #) )
by A1, Def13; verum