Earl

930 Reputation

8 Badges

19 years, 20 days

MaplePrimes Activity


These are questions asked by Earl

I have downloaded the zip file for CalcP7, unzipped it, and can access its commands in a worksheet after issuing the command with(CalcP7), but "No Matches Found" displays when entering the command ?CalcP7. The download included a file named "aplication" (one "p") of type HDB, but Maple15 can't seem to access its contents.

Are CalcP7's help pages displayable? If so, what is necessary to access them?

I have had no trouble downloading the user package DirectSearch and accessing both its commands and its help pages.

plots[implicitplot3d](max(-x+y+z, x-y+z, x+y-z) = 1.0, x = 0 .. 1, y = 0 .. 1, z = 0 .. 1);

The help page for max does not explain or show an example of max(sequence of expressions)= a constant. 

PrimesQuestion.mw

Please let me know if this link correctly accesses my worksheet. If not, I will copy its contents into this question.

Which ODE in the worksheet, if any, provides the correct answer?


restart

f := proc (x) local t; if not type(evalf(x), 'numeric') then ('procname')(x) else evalf(Int(exp(-(1/10)*t^2), t = 0 .. x)) end if end proc

solA := dsolve({diff(y(x), x) = y(x)+f(x), y(0) = 0}, numeric, known = f)

solA(1)

[x = 1., y(x) = HFloat(0.7081492947996167)]

(1)

f2 := evalf(Int(exp(-(1/10)*t^2), t = 0 .. 1)); f(1)

.9676433126

 

.9676433126

(2)

solB := dsolve({diff(y(x), x) = y(x)+f2, y(0) = 0}, numeric, output = listprocedure)

solB(1)

[x(1) = 1., (y(x))(1) = HFloat(1.6626837619970016)]

(3)

YinSolB := subs(solB, y(x))

YinSolBeval := solve(YinSolB(a) = .7081, a); solB(YinSolBeval)

.5491485953

 

[x(.5491485953) = .5491485953, (y(x))(.5491485953) = HFloat(0.7081000000284681)]

(4)

NULL


 

Is there a help page which explains why braces provide the partial text evaluation in this code?

RopeLen := 30;RopeAddLen := .5;

plots[textplot]([1, 1, typeset("%1", (({(1/2)*RopeLen}+{(1/2)*RopeAddLen})^2-{(1/2)*RopeLen}^2)^(1/2))])

eq1 := z = y*log(x): eq2 := z = y+x*log(x):

DispIntersecting := implicitplot3d([eq1, eq2], x = 0 .. 10, y = -30 .. 30, z = -40 .. 40, color = [blue, green]):

solve({eq1, eq2}, [x, y, z]);

assign(%):

DispIntersection := spacecurve([x, y, z], x = 0.1e-2 .. 10, color = red, view = [0 .. 10, -30 .. 30, -40 .. 40]):

display(DispIntersecting, DispIntersection, axes = boxed, scaling = constrained);

First 23 24 25 26 27 28 Page 25 of 28