3142 |
(math-mul (list 'calcFunc-as var-GenCount) val) |
(math-mul (list 'calcFunc-as var-GenCount) val) |
3143 |
(setq var-GenCount (math-add var-GenCount 1)) |
(setq var-GenCount (math-add var-GenCount 1)) |
3144 |
(calc-refresh-evaltos 'var-GenCount)) |
(calc-refresh-evaltos 'var-GenCount)) |
3145 |
(let* ((var (concat "s" (math-get-from-counter 'solve-sign))) |
(let* ((var (concat "s" (int-to-string (math-get-from-counter 'solve-sign)))) |
3146 |
(var2 (list 'var (intern var) (intern (concat "var-" var))))) |
(var2 (list 'var (intern var) (intern (concat "var-" var))))) |
3147 |
(if (eq solve-full 'all) |
(if (eq solve-full 'all) |
3148 |
(setq math-solve-ranges (cons (list var2 1 -1) |
(setq math-solve-ranges (cons (list var2 1 -1) |