Markiyan Hirnyk

Markiyan Hirnyk
9 years, 73 days


These are questions asked by Markiyan Hirnyk

How to numerically solve the problem

with Maple? Such type problems arise in elasticity theory (for example, see https://zbmath.org/?q=an:01366371).

Edit. Typo in the code:sin(y(x)) instead of sin(x).

 

I solve the problem on computational geometry: "A cube of side one contains two cubes of sides a and b having non-overlapping interiors. How to prove the inequality a+b≤1?" To this end I use the DirectSearch package , namely,

Here are some comments to it. The cube of side a is centered at (x_1,y_1,z_1) and rotated by the angles phi_1, psi_1, theta_1 (see http://uk.wikipedia.org/wiki/%D0%95%D0%B9%D0%BB%D0%B5%D1%80%D0%BE%D0%B2%D1%96_%D0%BA%D1%83%D1%82%D0%B8 ) and the cube of side b is centered at (x_2,y_2,z_2) and rotated by the angles phi_2, psi_2, theta_2. The procedure

calculates the distance between these cubes, for example,

st := time(); dist(.2, .9, .2, .2, .2, .7, .7, .7, 0, 0, 0, 0, 0, 0); time()-st;

[HFloat(5.453016092898238e-11), [s1 = HFloat(0.2646161775314957),

  s2 = HFloat(0.2828503247068887),

  s3 = HFloat(0.29444713116943216),

  t1 = HFloat(0.2646161774916062),

  t2 = HFloat(0.28285032471998384),

  t3 = HFloat(0.2944471311346344)], 2527]
                            191.133
Unfortunately, my code (which is syntactically correct) is spinning on my wondercomp during 10 hours without any output. I don't understand it at all. Your advices are welcome.

twocubes.mw

How to solve the equation
2^(sin(x)^4-cos(x)^2)-2^(cos(x)^4-sin(x)^2) = cos(2*x)
symbolically? The solve command produces a weird answer. Evalfing all its values, one sees
0.7853981634, -0.7853981634, 2.356194490, -2.356194490,

1.570796327 - 1.031718534 I, -1.570796327 + 1.031718534 I,

1.570796327 + 1.031718534 I, -1.570796327 - 1.031718534 I,

0.7853981634, -0.7853981634, 2.356194490, -2.356194490,

1.570796327 - 1.031718534 I, -1.570796327 + 1.031718534 I,

1.570796327 + 1.031718534 I, -1.570796327 - 1.031718534 I


The identify command
interprets the real solutions on -Pi..Pi as -3*Pi/4, -Pi/4, Pi/4, 3*Pi/4
(for example,
identify(2.356194490);

3*Pi/4 ).
Is it possible to obtain these with Maple in a simpler way?

PS. Mathematica 10 does the job.

PPS. So does even Mathematica 7.

How to solve the system
{sqrt((x-1)^2+(y-5)^2)+(1/2)*abs(x+y) = 3*sqrt(2), sqrt(abs(x+2)) = 2-y}
over the reals symbolically? Of course, with Maple. Mathematica does the job.

How to solve the inequality

with Maple?

My attempts were the following.

Warning, solutions may have been lost

Of course, this works

f(1);
,

but one wishes to describe the solutions in the dependence on the parameter a. Unfortunately, both

and

produce wrong outputs(An SCR has been submitted by me.).

 

 

 

 

 

 

1 2 3 4 5 6 7 Last Page 1 of 26