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-exp-integrate

F1: t * exp(-s*t);

F2: 2 * exp(-s*t);

Res1: integrate(F1, t...

Calculate

eval-exp-log-solve

a:(1 - exp(-( log(4) ...

solve(a,A1);

eval(A1);

Calculate

eval

eq1: (3/2)**x-356=0;

x=14.49;

eval(eq1);

Calculate

eval

eval((366/12));

Calculate

eval

eval(x*(x-6));

Calculate

eval-is-part-solve-split-string

answer: solve(x^2=1);

part(answer,1);

part(answer,2);

Calculate

eval-exp

eq1: M1 = (Phi+(Ld-Lq...

a : exp(i*2*pi/3);

eq2: idq = iu+a*iv+a^...

Calculate

eval-if-labels-lambda-rest-reverse-sum

:lisp (defun enum-int...

:lisp (defun group (s...

:lisp (defun row-sum ...

Calculate

eval-if-labels-lambda-rest-reverse-sum

:lisp (defun enum-int...

:lisp (defun group (s...

:lisp (defun row-sum ...

Calculate

eval-ratsimp-solve

eq1:%e^x=x;

eq2:solve(eq1,x), eval;

ratsimp(eq2);

Calculate