Vocabulary
calendar

Inputs
timestampan object


Outputs
timestamp'an object


Definition

: saturday>= ( timestamp -- timestamp' ) [ saturday ] day>= ;