## Animal is-a object look at the extra creditclassAnimaldefis_what()puts"#{@name} is an animal."endend## is-aclassDog<Animaldefinitialize(name)## has-a@name=nameenddefis_what()puts"#{@name} is a dog."endend## is-aclassCat<Animaldefinitialize(name)## has-a@name=nameendend## is-aclassPersondefinitialize(name)## has-a@name=name##Person has-a pet of some kind@pet=nilendattr_accessor:petend## is-aclassEmployee<Persondefinitialize(name,salary)## has-asuper(name)## has-a@salary=salaryendend## is-aclassFishend## is-aclassSalmon<Fishend## is-aclassHalibut<Fishend## rover is-a Dogrover=Dog.new("Rover")## is-asatan=Cat.new("Satan")## is-amary=Person.new("Mary")## has-manymary.pet=[satan,rover]rover.is_what