let A be set ; :: thesis: {} is Function of A, {}
per cases ( A = {} or A <> {} ) ;
end;