close Warning: Can't synchronize with repository "(default)" (The repository directory has changed, you should resynchronize the repository with: trac-admin $ENV repository resync '(default)'). Look in the Trac log for more information.

Ignore:
Timestamp:
2015-06-18T20:31:31-07:00 (9 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/monom.lisp

    r2349 r2350  
    7878
    7979(defmethod shared-initialize :after ((self monom) slot-names
    80                               &rest initargs
    81                               &key
    82                                 dimension
    83                                 exponents
    84                                 exponent
    85                               &allow-other-keys
    86                                 )
     80                                     ;;&rest initargs
     81                                     &key
     82                                       dimension
     83                                       exponents
     84                                       exponent
     85                                     &allow-other-keys
     86                                       )
    8787  ;;(format t "MONOM::SHARED-INITIALIZE called with:~&SLOT-NAMES: ~W~&INITARGS: ~W.~%" slot-names initargs)
    8888  (let* ((new-dimension (cond (dimension dimension)
Note: See TracChangeset for help on using the changeset viewer.