Einfügen in eine sortierte Liste III

Nach der Schleife, die die Einfügeposition sucht, gilt:

ptr = prev.next

Op.Compare(appointment.time, prev.appointment.time) >= 0

(ptr = NIL) OR
Op.Compare(appointment.time, ptr.appointment.time) < 0)

Entsprechend wird das neue Element zwischen prev und ptr eingefügt:

element.next := ptr; prev.next := element;