### Related

##### freeof-lambda

f:lambda([aa],freeof(...

f(bb*x^2);

Calculate

? freeof;

Calculate

##### freeof

freeof(true,[false]);

Calculate

##### freeof

freeof((a+1)>(2),a);

Calculate

##### freeof

freeof((a+1)>(a+2));

Calculate

##### freeof-sqrt

freeof(%i,((-(sqrt(3)...

Calculate

##### freeof-lambda-sqrt-sublist

ll: [((-(sqrt(3)*%i)/...

sublist(ll,lambda([x]...

Calculate

##### freeof-lambda

f:lambda([aa],freeof(...

f(bb*x^2);

Calculate

##### freeof-sqrt

freeof(((-(sqrt(3)*%i...

Calculate

##### freeof-lambda

f:lambda([aa],freeof(...

f(bb*x^2);

Calculate

### freeof

Run Example
```(%i1)polyp(expr,var):=polynomialp(expr,[var],buildq([bb:var],lambda([aa],freeof(bb,aa))));
(%o1) polyp(expr, var) := polynomialp(expr, [var],
buildq([bb : var], lambda([aa], freeof(bb, aa))))
(%i2) polyp(a*x+b(x),x);
(%o2)                                false
(%i3) ```
Run Example
```f:lambda([aa],freeof(aa,bb));
(%o1)                    lambda([aa], freeof(aa, bb))
(%i2) f(aa*x^2);
(%o2)                                true
(%i3) ```
Run Example
```load(functs);
(%o1)      /usr/share/maxima/5.21.1/share/simplification/functs.mac
(%i2) sqrtdispflag:false;
(%o2)                                false
(%i3) isolate_wrt_times:true;
(%o3)                                true
(%i4) expr:sqrt(a*x^2 + b*x + 3*x), expand;
2             1/2
(%o4)                        (a x  + b x + 3 x)
(%i5) map(lambda([y], y), expr);
2             1/2
(%o5)                        (a x  + b x + 3 x)
(%i6) maplist(lambda([y], if(not(freeof(x, y))) then isolate(y, x) else y), expr);
2              1
(%o6)                        [a x  + b x + 3 x, -]
2
(%i7) ```