Hiya JimB...

>Of course if the horse has a swim method and the arguments included what side should be down a simple Horse.Swim("Back") could do the trick. :-)

DEFI CLASS mammal AS custom
   MammalType=""
   FUNC Init
      LPARMS cMammalType
      THIS.MammalType=cMammalType
      RETURN
   ENDFUNC
   FUNC Swim(cDirection)
      cResults="Lived"
      IF cDirection="Back"
         IF THIS.MammalType="Horse"
            cResults="Drowned"
         ENDIF
      ENDIF
      RETURN (cResults)
   ENDFUNC
ENDDEFINE

oHorse=CREATEOBJECT("Mammal","Horse")
cResult=oHorse.Swim("Back")
?cResult

Drowned

Damn...I guess it would drown :-)