MODULE; IMPORT Word; PROCEDURE Refany Equal (r1, r2: T): BOOLEAN = BEGIN RETURN r1 = r2 END Equal; EXCEPTION Error; <*FATAL Error*> PROCEDUREHash (<*UNUSED*> r: T): Word.T = BEGIN RAISE Error END Hash; PROCEDURECompare (<*UNUSED*> r1, r2: T): [-1 .. 1] = BEGIN RAISE Error END Compare; BEGIN END Refany.