3160 |
(math-mul val (list 'calcFunc-an var-GenCount)) |
(math-mul val (list 'calcFunc-an var-GenCount)) |
3161 |
(setq var-GenCount (math-add var-GenCount 1)) |
(setq var-GenCount (math-add var-GenCount 1)) |
3162 |
(calc-refresh-evaltos 'var-GenCount)) |
(calc-refresh-evaltos 'var-GenCount)) |
3163 |
(let* ((var (concat "n" (math-get-from-counter 'solve-int))) |
(let* ((var (concat "n" (int-to-string |
3164 |
|
(math-get-from-counter 'solve-int)))) |
3165 |
(var2 (list 'var (intern var) (intern (concat "var-" var))))) |
(var2 (list 'var (intern var) (intern (concat "var-" var))))) |
3166 |
(if (and range (eq solve-full 'all)) |
(if (and range (eq solve-full 'all)) |
3167 |
(setq math-solve-ranges (cons (cons var2 |
(setq math-solve-ranges (cons (cons var2 |