#lang racket/base (require racket/contract unstable/latent-contract) (require "../common/date-time.rkt") (provide (contract-out (struct plot-time ([second (and/c (>=/c 0) (seconds seconds->plot-time datetime->real))