year-ordinal>timestamp ( year ordinal -- timestamp )


Vocabulary
calendar

Inputs
yearan object
ordinalan object


Outputs
timestampan object


Definition
USING: kernel math ;

IN: calendar

: year-ordinal>timestamp ( year ordinal -- timestamp )
[ 1 1 julian-day-number ] dip + 1 -
julian-day-number>date <date-gmt> ;