--
--^ A canine.
--

property ancestor

on birth me
  set the ancestor of me = birth(script "mammal")
  set the favouriteSound of me = "woof!"
  set the mySpecies of me = "dog"
  return me
end