procedure Learn; override;

This is Learn, a member of class TBackpropagationNetwork.