Plan 9 from Bell Labs’s /usr/web/sources/contrib/fgb/root/sys/src/cmd/4th/examples/demo/eastersu.4th

Copyright © 2021 Plan 9 Foundation.
Distributed under the MIT License.
Download the Plan 9 distribution.


include lib/enter.4th
include lib/easter.4th

: PROMPT                               ( ask for parameters )
  ." Enter year: " enter
  easterSunday swap rot 
  ." Easter will take place on "
  2 .r [char] / emit 1 .r [char] / emit . cr

;

prompt

Bell Labs OSI certified Powered by Plan 9

(Return to Plan 9 Home Page)

Copyright © 2021 Plan 9 Foundation. All Rights Reserved.
Comments to [email protected].