ALTER TYPE GeoCoord
 ADD MEMBER FUNCTION Distance (other IN GeoCoord)
     RETURN NUMBER,
 ADD MAP MEMBER FUNCTION Distance_Greenwich
     RETURN NUMBER
 CASCADE ;
