procedure Insert(Key: float; Info: Pointer);

This is Insert, a member of class TANNpr_queue.