Sponsored links: Algebra eBooks
 

Help Index

A

B

C

D

E

F

G

H

I

J

K

L

M

N

O

P

Q

R

S

T

U

V

W

X

Y

Z

The Maxima on-line user's manual

Algebra Calculator

Search:

Eval Calculator

Eval

-- Special symbol: eval As an argument in a call to ev (<expr>), eval causes an extra evaluation of <expr>. See ev.

Example:

:lisp (defun enum-interval (low high &optional p)  (let* ((result nil)         (end-result 0))    (do* ((low low (+ low 1)))      ((> low high) (if (not p) end-result (values-list end-result)))      (setf end-result (reverse (push low result))))));
:lisp (defun group (source n)  (if (zerop n) (error "zero length"))  (labels ((rec (source acc)             (let ((rest (nthcdr n source)))               (if (consp rest)                   (rec rest (cons (subseq source 0 n) acc))                   (nreverse (cons source acc))))))    (if source (rec source nil) nil)));
:lisp (defun row-sum (min max n)  (let ((list (enum-interval min max)) (result))    (values-list     (dotimes (i (length (group list n)) (values (nreverse result)))       (push        (list (mapcan (lambda (x) (if (numberp x) (list x)))              (nth i (group list n)))              (format nil "sum: ~a" (reduce

          (%i1) [a:b,b:c,c:d,d:e];
          (%o1)                            [b, c, d, e]
          (%i2) a;
          (%o2)                                  b
          (%i3) ev(a);
          (%o3)                                  c
          (%i4) ev(a),eval;
          (%o4)                                  e
          (%i5) a,eval,eval;
          (%o5)                                  e

There are also some inexact matches for eval. Try ?? eval to see them.

(%o1)                                true
(%i2) 

Eval Example

Related Examples

eval

z: x*y;

y: (a+b)*x;

eval(z);

Calculate

eval-false-if-labels-lambda-quotient-rest-reverse-sum-true

:lisp (defun enum-int...

:lisp (defun group (s...

:lisp (defun row-sum ...

Calculate

eval

xx:f(x,y):=(a*x^2 + b...

eval(f(x=1,y=1));

Calculate

eval-sin-sqrt

eval(1/8*(5/9*sin(pi*...

Calculate

eval-sin-sqrt

eval(1/8*(5/9*sin(pi*...

sin(pi);

Calculate

eval

xx:(a*x^2 + b*x*y);

eval(xx, [x=1]);

Calculate

eval

z: x*y;

y: (a+b)*x;

eval(z);

Calculate

eval-linsolve

eq1:a1*y-x=k;

eq2:-a0*y+x=k/(m-1);

linsolve([eq1,eq2],[x...

Calculate

eval-solve

eq1:d=p+v*t+(a*t^2)/2;

eq2:solve(eq1,t);

d:10;

Calculate

eval-solve

eval(solve(x^x=1,x));

Calculate