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