stack[T:TYPE] : THEORY
BEGIN
IMPORTING Maybe[T]
stack : TYPE = list[T]
pop(s:stack) : stack = IF null?(s) THEN s ELSE cdr(s) ENDIF
top(s:stack) : Maybe[T] = IF null?(s) THEN None ELSE Some(car(s)) ENDIF
push(t:T,s:stack) : stack = cons(t,s)
END stack
¤ Dauer der Verarbeitung: 0.12 Sekunden
(vorverarbeitet)
¤
|
Haftungshinweis
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.
|