### Related

f(x):=1/sqrt(x);

g(x):=3/sqrt(x);

h(x):=2*x^4;

Calculate

##### is-numer

lis: [1,1,1,1,1,1,1,1...

[quantile (lis, 1/10)...

Calculate

is("a" = "b");

Calculate

##### is

a:[1,2,3];

b:[1,2,3];

is(a=b) or is(a=b);

Calculate

##### is

is(-12*x^2*y^2>=0);

Calculate

##### is-subst

subst([x=1,y=2,z=3],a...

is(subst([1,2,3],[x,y...

Calculate

mye: (x^2-1)/(x-1)=0;

(is(((subst( x + 1 = ...

Calculate

##### is-sqrt

is(sqrt(4)*sqrt(4)=sq...

is(sqrt(7)*sqrt(8)=sq...

Calculate

##### is

is((x/y)^(1/2)=x^(1/2...

Calculate

##### is-ratsimp

a1:ratsimp(a/c+b/c);

a2:a/c+b/c;

a3:(a+b)/c;

Calculate

### is

Run Example
```(%i1)solve(-18*x^2-50=600*x)[1];
15 sqrt(11) + 50
(%o1)                       x = - ----------------
3
(%i2) solve(-18*x^2-50=600*x)[2];
15 sqrt(11) - 50
(%o2)                        x = ----------------
3
(%i3) xvals: map(rhs,solve(-18*x^2-50=600*x));
15 sqrt(11) + 50  15 sqrt(11) - 50
(%o3)               [- ----------------, ----------------]
3                 3
(%i4) yvals: map(lhs,solve(-18*x^2-50=600*x));
(%o4)                               [x, x]
(%i5) yvals[1] - xvals[1];
15 sqrt(11) + 50
(%o5)                        x + ----------------
3
(%i6) for i:1 while i<
=(length(realroots(-18*x^2-50=600*x))) do (mye:yvals[i] - xvals[i],a:if(is(ratsimp(abs(mye-0)<
= 0))) then return (100));
(%o6)                                done
(%i7) a;
(%o7)                     if unknown then return(100)
(%i8) ```
Run Example
```eq1: va = 2*ia*r;
(%o1)                             va = 2 ia r
(%i2) eq2: vb = va + ib*r;
(%o2)                           vb = va + ib r
(%i3) eq3: vc = vb + ic*r;
(%o3)                           vc = vb + ic r
(%i4) eq4: vd = vc + id*r;
(%o4)                           vd = vc + id r
(%i5) eq5: v0 - va = 2*i0*r;
(%o5)                          v0 - va = 2 i0 r
(%i6) eq6: v1 - vb = 2*i1*r;
(%o6)                          v1 - vb = 2 i1 r
(%i7) eq7: v2 - vc = 2*i2*r;
(%o7)                          v2 - vc = 2 i2 r
(%i8) eq8: v3 - vd = 2*i3*r;
(%o8)                          v3 - vd = 2 i3 r
(%i9) eq9: ia = ib + i0;
(%o9)                            ia = ib + i0
(%i10) eq10: ib = ic + i1;
(%o10)                           ib = ic + i1
(%i11) eq11: ic = id + i2;
(%o11)                           ic = id + i2
(%i12) eq12: id = i3 - is;
(%o12)                           id = i3 - is
(%i13) eq13: vd = 0;
(%o13)                              vd = 0
(%i14) solve ([eq1,eq2,eq3,eq4,eq5,eq6,eq7,eq8,eq9,eq10,eq11,eq12,eq13],[i0,i1,i2,i3,ia,ib,ic,id,va,vb,vc,vd,is]);
- 4 v2 - 10 v1 + 43 v0         4 v2 - 22 v1 + 5 v0
(%o14) [[i0 = ----------------------, i1 = - -------------------,
128 r                         64 r
- 12 v2 + 2 v1 + v0       v3        4 v2 + 10 v1 + 21 v0
i2 = - -------------------, i3 = ---, ia = --------------------,
32 r               2 r              128 r
- 4 v2 - 10 v1 + 11 v0         - 4 v2 + 6 v1 + 3 v0
ib = - ----------------------, ic = - --------------------,
64 r                          32 r
4 v2 + 2 v1 + v0       4 v2 + 10 v1 + 21 v0       4 v2 + 10 v1 + 5 v0
id = - ----------------, va = --------------------, vb = -------------------,
16 r                      64                        32
4 v2 + 2 v1 + v0               8 v3 + 4 v2 + 2 v1 + v0
vc = ----------------, vd = 0, is = -----------------------]]
16                               16 r
(%i15) ```
Run Example
```A:[-2,3];
(%o1)                              [- 2, 3]
(%i2) B:[4,-1];
(%o2)                              [4, - 1]
(%i3) C:[7,3];
(%o3)                               [7, 3]
(%i4) c:B-A;
(%o4)                              [6, - 4]
(%i5) a:C-B;
(%o5)                               [3, 4]
(%i6) b:A-C;
(%o6)                              [- 9, 0]
(%i7) z:[1,%i];
(%o7)                               [1, %i]
(%i8) c:c.z;
(%o8)                              6 - 4 %i
(%i9) a:a.z;
(%o9)                              4 %i + 3
(%i10) b:b.z;
(%o10)                                - 9
(%i11) c:abs(c);
(%o11)                            2 sqrt(13)
(%i12) a:abs(a);
(%o12)                                 5
(%i13) b:abs(b);
(%o13)                                 9
(%i14) is(b^2=a^2+c^2);
(%o14)                               false
(%i15) ```

Help for Is