History models record previous values.

history

<history> ( value -- history )

Recording history:

add-history ( history -- )

Navigating the history:

go-back ( history -- )

go-forward ( history -- )