Update of /project/movitz/cvsroot/movitz/losp/muerte In directory clnet:/tmp/cvs-serv27598

Added Files: complexes.lisp Log Message: Add trivial implementations of complexes and pathnames.

--- /project/movitz/cvsroot/movitz/losp/muerte/complexes.lisp 2008/03/20 22:21:02 NONE +++ /project/movitz/cvsroot/movitz/losp/muerte/complexes.lisp 2008/03/20 22:21:02 1.1 ;;;;------------------------------------------------------------------ ;;;; ;;;; Copyright (C) 2008, Frode V. Fjeld ;;;; ;;;; Description: Complex numbers ;;;; Author: Frode Vatvedt Fjeld ;;;; Distribution: See the accompanying file COPYING. ;;;; ;;;; $Id: complexes.lisp,v 1.1 2008/03/20 22:21:01 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------

(require :muerte/basic-macros) (require :muerte/defstruct)

(in-package muerte)

(provide :muerte/complexes)

(defstruct (complex (:constructor make-complex-number) (:conc-name "")) realpart imagpart)