let V be non empty set ; :: thesis: for m being Element of Maps V holds m = [[(dom m),(cod m)],(m `2)]
let m be Element of Maps V; :: thesis: m = [[(dom m),(cod m)],(m `2)]
A1: ex f being Element of Funcs V ex A, B being Element of V st
( m = [[A,B],f] & ( B = {} implies A = {} ) & f is Function of A,B ) by Th4;
then m `1 = [(dom m),(cod m)] by MCART_1:7, MCART_1:8;
hence m = [[(dom m),(cod m)],(m `2)] by A1, MCART_1:8; :: thesis: verum