home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
AmigActive 3
/
AACD03.BIN
/
AACD
/
Programming
/
sofa
/
archive
/
SmallEiffel.lha
/
SmallEiffel
/
lib_show
/
animal
/
quadrupede.e
< prev
next >
Wrap
Text File
|
1999-06-05
|
245b
|
16 lines
deferred class QUADRUPEDE
inherit
ANIMAL
redefine reproduction
end;
feature {ANY}
reproduction(autre: ANIMAL): ANIMAL is
do
Result := autre.reproduction_avec_quadrupede(Current);
end;
end -- QUADRUPEDE