Check type compatibility

Hi all,
is there a way to check if two attribute are type compatible (for
example integer and serial, integer and integer, character varying and
text, etc..)?

Example:
IF (compatible (table1.att1, table2.att2)) THEN
...
ELSE
...
END IF;

Thanks