### Related

##### declare-evfun

declare (sigma, evfun);

Calculate

##### declare-diagmatrix-exp-feature-transpose

declare(sym_matrix, f...

declare(W, sym_matrix);

declare(a, sym_matrix);

Calculate

dotconstrules:true;

Calculate

##### declare-expand-mainvar

expand((1-3*x*y)^3);

declare(x,mainvar);

Calculate

dotsimp:true;

T(x):=x*y^2;

Calculate

##### declare-is

declare(k, integer);

declare(x, real);

is(%e^(%k) < %e^(%...

Calculate

init_atensor(clifford...

q(a,b,c,d):=a+b.v[1]+...

Calculate

##### declare-diff-linear-linsolve

declare(E,linear);

declare(m, constant, ...

lse: E((y[k]-(m*x[k]+...

Calculate

dotconstrules:true;

Calculate

##### declare-limit

declare(a,scalar);

declare(T12, nonscala...

I(X):=(X^^(-1));

Calculate

### declare

Run Example
```(%i1)declare(k, integer);
(%o1)                                done
(%i2) declare(x, real);
(%o2)                                done
(%i3) is(%e^(%k) <
%e^(%k*x^2));
(%o3)                               unknown
(%i4) ```
Run Example
```declare(theta,scalar,phi,scalar);
(%o1)                                done
(%i2) declare(T12, nonscalar ,T14c, nonscalar ,T14e,nonscalar,B,nonscalar,A,nonscalar);
(%o2)                                done
(%i3) dotscrules:true;
(%o3)                                true
(%i4) I(X):=(X^^(-1));
<- 1>
(%o4)                           I(X) := X
(%i5) T(X):=X.I(T12).T14c.I(T14e).T12.I(X).T14e;
(%o5)  T(X) := X . (I(T12) . (T14c . (I(T14e) . (T12 . (I(X) . T14e)))))
(%i6) T(T12+a*A)-T(T12);
<- 1>              <- 1>                    <- 1>
(%o6) (T12 + a A) . T12      . T14c . T14e      . T12 . (T12 + a A)      . T14e
- T14c
(%i7) ```
Run Example
```declare(r,real);
(%o1)                                done
(%i2) declare(t,real);
(%o2)                                done
(%i3) a:K1*r*exp(%i*t)+K2*r**2*exp(%i*2*t)+K3*r**3*exp(%i*3*t);
3   3 %i t       2   2 %i t          %i t
(%o3)            r  %e       K3 + r  %e       K2 + r %e     K1
(%i4) Bt:diff(a,r);
2   3 %i t            2 %i t        %i t
(%o4)           3 r  %e       K3 + 2 r %e       K2 + %e     K1
(%i5) Br:diff(a,t)/r;
3   3 %i t            2   2 %i t             %i t
3 %i r  %e       K3 + 2 %i r  %e       K2 + %i r %e     K1
(%o5)     ----------------------------------------------------------
r
(%i6) factor(Bt*conjugate(Bt)+Br*conjugate(Br));
- 2 %i t     2            %i t        2 %i t
(%o6) 2 %e         (3 r  K3 + 2 r %e     K2 + %e       K1)
2   2 %i t            %i t
(3 r  %e       K3 + 2 r %e     K2 + K1)
(%i7) ```

Help for Declare