Christian Wolinski

MaplePrimes Activity

These are replies submitted by Christian Wolinski

@ecterrab That was my mistake. I forgot type testing was done to the initial value not to the resulting value. "You find that which you seek".

@Carl Love The reason is subsindets uses strict operand ordering unlike the indets call used.
Try this example:

i := 0;
h := proc(x) global i; i := i + 1; T[i, op(0,x)](op(x)) end;
subsindets(f(f(f(f(x), g(y)), f(x)), g(y)), function, h);

@Carl Love I dont know why this selected the best answer. It gives undesirable elements in the result.

Because y is in your expression:

expr := y^2*sin(1/y) + y^(3/2) + y + x*y^7;

y is included in the result. Should y be included in the answer to the following expression:

expr := y^2*sin(1/y) + y^(3/2) + x*y^7;

I have noticed that after entering the login/password "My Maple Cloud" section momentarily appears and vanishes and I remain not logged in. I am able to login via web browser, but I would prefer to login via my Maple.

@9009134 Just like Carl Love pointed out, the name differs from its appearance. That is why I had to use:

S := remove(type, indets(B, function), trig);

to collect the functions. You can get the names & substitutions from this also:

S2 := (sort@[op]@map2)(op, 0, remove(has, S, diff));
S3 := [f__31, f__21, f__11];
lprint(`=`~(S2, S3));
subs(`=`~(S2, S3), eval(W));

@9009134 I think you mean to use subs command: subs([u__r=f__11, u__theta=f__21, u__phi=f__31], eval(W));


#instead of
#W := map(proc (S) ([op])(S); map2(map2, op, [1, 2], %) end proc, W)
W := map2(add@map, `*`@op, W);

@acer You wrote:

Na0 := NumberTheory:-Divisors(coeff(p,x,0));


Nan := NumberTheory:-Divisors(coeff(p,x,degree(p,x)));

I think it should be:

Na0 := NumberTheory:-Divisors(tcoeff(p,x));


Nan := NumberTheory:-Divisors(lcoeff(p,x));


I have one question. What do you use to read contents of a module? I find them very obscured.

@Carl Love It is a small step in the right direction.

It sounds like you are looking for the annihilator of sin(erf(t)) and annihilator of cos(erf(t)). Am I right?

@9009134 If you used radius r0 for your cylinder plot and want to present it with radius r1 on a torus of radius R0: F(R0, r1/r0, (2*Pi)/0.5); The third coordinate lets you transform z coordinate into the angle by scaling z.

Do you intend to use cylinder plot in your solution?

also try with
f := F(1, 2, (2*Pi)/0.5);

@ Thank You for verifying this.

5 6 7 8 9 10 11 Page 7 of 14