easter ( obj -- obj' ) - Factor Documentation

easter ( obj -- obj' )

Vocabulary
calendar

Inputs

obj an object

Outputs

obj' an object

Definition

GENERIC: easter ( obj -- obj' )

Methods

USING: calendar kernel math ;

M: integer easter dup easter-month-day <date> ;

USING: accessors calendar kernel ;

M: timestamp easter
clone dup year>> easter-month-day swapd >>day swap >>month ;