friday<= ( timestamp -- timestamp' )


Vocabulary
calendar

Inputs
timestampan object


Outputs
timestamp'an object


Definition

: friday<= ( timestamp -- timestamp' ) [ friday ] day<= ;