Changeset 30879 in project


Ignore:
Timestamp:
05/16/14 09:10:38 (6 years ago)
Author:
Ivan Raikov
Message:

signal-diagram: correction to relations handling in algebraic systems

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/signal-diagram/trunk/algebraic-system.scm

    r30104 r30879  
    321321      (let* ((dfe (larrow-dfe ls))
    322322             (dfe1 (make-dfe (dfe-gen dfe) (dfe-kill dfe)
    323                              (lambda (s) (delete-duplicates
    324                                           (append ((dfe-in dfe) s)
    325                                                   (relations-inputs ls)
    326                                                   (relation-vars r))))
     323                             (lambda (s) (delete-duplicates
     324                                          (lset-difference eq?
     325                                              (append ((dfe-in dfe) s)
     326                                                      (relations-inputs sf))
     327                                              (relation-vars r))))
    327328                             (dfe-out dfe))))
    328329        (make-larrow dfe1
Note: See TracChangeset for help on using the changeset viewer.