#lang r5rs
(#%require scheme/include
           (only scheme/base time))
(include "psyntax.sch")