Swatch Internet Time In Common Lisp