Source position: unit_breeding_window.pas line 18
procedure Open_Breeding_Window(
var theInput: TEHandle
);