Methods
Include in the TYPE definition:
MEMBER FUNCTION lon() RETURN NUMBER
CREATE TYPE BODY source
AS MEMBER FUNCTION lon ()
RETURN NUMBER
IS   BEGIN
     /* left as an exercise */
     RETURN lon;
   END;
END;