Changeset 3850
- Timestamp:
 - 2016-05-28T13:08:52-07:00 (9 years ago)
 - File:
 - 
      
- 1 edited
 
- 
          
  branches/f4grobner/monom.lisp (modified) (1 diff)
 
 
Legend:
- Unmodified
 - Added
 - Removed
 
- 
      
branches/f4grobner/monom.lisp
r3849 r3850 233 233 (cond ((endp denominators) 234 234 (divide-by 1 numerator)) 235 (t (divide-by (copy-instance numerator) (apply #'multiply denominators))))) )235 (t (divide-by (copy-instance numerator) (apply #'multiply denominators))))) 236 236 237 237 (defgeneric divides-p (object1 object2)  
  Note:
 See   TracChangeset
 for help on using the changeset viewer.
  