Vocabulary
calendar

Inputs
timestampan object


Outputs
timestamp'an object


Definition

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