Changeset 27369 in project

Timestamp:

09/03/12 07:42:16 (9 years ago)

Author:

Ivan Raikov

Message:

nemo: bugfix in generating reversal potentials for non-specific currents

File:

• release/4/nemo/trunk/nemo-nmodl.scm (modified) (3 diffs)

release/4/nemo/trunk/nemo-nmodl.scm

@@ -931 +931 @@
                                                (sptms      (map (lambda (st pwr) (if pwr `(pow ,st ,pwr) st)) sts pwrs))
                                                (gion       `(* ,gmax ,@sptms)))
-
                                           (list i e gion (nmodl-name (s+ 'i_ label)))))))
 
@@ -938 +937 @@
                                        ((non-specific)
                                         (let* ((i      (nmodl-name 'i))
-                                               (e      (nmodl-name (s+ 'e (cn perm))))
+                                               (e      (nmodl-name 'e))
                                                (gmax   (car ((dis 'component-exports) sys (cid pore)))))
                                           (list i e gmax (nmodl-name (s+ 'i_ label)))))
@@ -1085 +1084 @@
                            (case (cn perm)
                              ((non-specific)
-                              (let* ((e       (nmodl-name 'e))
-                                     (elocal  (car permqs)))
-                                (if (not (equal? e elocal))
-                                    (pp indent+ ,(expr->string/NMODL (nmodl-name elocal) e)))))
-                             
+                              (begin))
+
                              (else
                               (let* ((e      (nmodl-name (s+ 'e (cn perm))))