day-this-week ( timestamp n -- timestamp' )

Vocabulary

calendar.private

Inputs

timestamp	an object
n	an object

Outputs

timestamp'

an object

Definition

USING: calendar ;

IN: calendar.private

: day-this-week ( timestamp n -- timestamp' )
    day-offset days time+ ;