## Units in manual calculation of expression vs using...

Asked by:

I was just using Maple to do a simple calculation but the units came out all complicated.

The expression in question is work done by a van der Waals gas. The units should come out to Joules per mol.

When I do the calculation manually (second expression below) I do get that result, albeit in more basic units than Joules.

In the first expression, in which I am using subs to sub in values with units into the expression, the final expression is very complicated. Why?

 (1)

How do we simplify the units above so they become the same as the units in the same (manual) calculation below?

 (2)

Download Units_-_Subs.mw

## Explore a surface...

Asked by:

Dear all,

I'd like to explore graphically a polynomial surface depending on two parameters a and b.

The problem is that, as soon as I start playing with the sliders, Maple freezes and I have to 'force quit'.

Can you please tell me if you have the same problem with this example?

Thanks.

 > restart:
 > with(plots):
 > K := 1 - y*x - (1 - x)*(b*x^3 + a*x^2 + x + 1)*(1 - y)*(b*y^3 + a*y^2 + y + 1)
 (1)
 > Explore(plot3d(K, x=0..1, y=0..1,  font= [Times, bold, 20], labels= ['x', 'y','z'],   labelfont= [Times, bold, 40],  title = "K(x,y)"), b = 0..1., a=0..1.);

Download Explore.mw

## Error with minimize/maximize...

Asked by:

Dear all,

I have this polynomial function

G(x, y) := (-0.14*y^3 + 1.20000000000000*y^2 - 1.26000000000000*y + 0.200000000000000)*x^3 + (1.20*y^3 - 10.0800000000000*y^2 + 10.0800000000000*y - 1.20000000000000)*x^2 + (-8.82*y + 10.08*y^2 - 1.26*y^3)*x + 1. - 1.2*y^2 + 0.2*y^3

I don't understand why the command

minimize(G(x,y),x=0..1,y=0..1);

produces the error

Error, (in RootOf/RootOf:-algnum_in_range) invalid input: RootOf/RootOf:-rootof_in_range expects its 1st argument, rt, to be of type ('RootOf')(polynom(rational,_Z),identical(index) = posint), but received RootOf(7*_Z^3-93*_Z^2+327*_Z-187)

Thanks for your advices, Nicola

## Double integrals...

Asked by:

Dear all

I have a function like

F[1] := (x, y) -> x*y/(1 + 10.35841093*(1 - x)*((-1)*0.9*x + 1)*(1 - y)*((-1)*0.9*y + 1))

This function is continuous on D = [0,1]x[0,1]. I'm interested in the (approximate) value of the double integral over D.

Unfortunately the entry

int(int(F[1](x,y),x=0..1.),y=0..1.)

produces Float(infinity).

Thanks Nicola

## Why the coefficients are zero?...

Asked by:

Why Maple return 0 when I try to find coefficients of different power of lambda's.coeff.mw

## why i am facing issues while changing the example?...

Asked by:

i have made a full working code for differential quadrature method now i am  changing examples and it is not working although i have properly defined new parameters i am attaching my code kindly help me out
one more thing one example include summation n=0..ininity it is not even evaluating taking alot of time i am attaching both codes kindly help me out
A+B_example.mw
chelishkov_comparison.mw

## non-linear system...

Asked by:

I have this problem with this system of equations, when I solve the 13x13 system it does not give me any solution, neither giving seed values ​​nor placing full digits. The exercise is solved and I tried to assume close values ​​and it doesn't work for me, it leaves everything expressed with the fsolve command.

Download p1.mw

## How do i re-edit my maple file after evaluating it...

Asked by:

while running my code i am not able to edit it. when i close my file and re open it then it is edit able but only once after that to re edit i have to run it again.
one more query i am facing is that i have made whole code now i just want to change pde and exact solution of that pde to get different solutions of pde although my code is working for one pde but while changing pde it is giving me error why?
and some times it takes alot of time to evaluate is there any error in the code or should i change my laptop?

kindly help me with all these queries.

## How does Maple solve, int(y'(x)*f(x), x) =[int(sqr...

Asked by:

'odeadvisor' suggests isolating y(x) from the equation as a first step, y=G(x,y'(x)), then apply the method of 'patterns'. For the first step, y(x) = (9/4)*[(y'(x))^2]/{[int(f(x),x)]^5} is what I found but, could take it no further. Nevertheless, Maple finds an intrinsic solution of the form, (3/4)*y(x)^(4/3) +(2/3)*int(sqrt(y(x)*f(x))^(-5/3) + _C1 =0, from which an explicit solution can be obtained. If anyone can supply the steps leading to the Maple solution - that would be great.

## physics Simplify does not return a number...

Asked by:

simp.mw

please see simp.mw file

## How do I solve a system of differential equations ...

Asked by:

Hello everyone

I need help solving a system of equations as below. I'm looking for a way to do it, but I don't understand the general concept of how such an equation is calculated. So far I've been using a package in LabVIEW that worked similarly to Simulink and that was clear to me, whereas here I'm overwhelmed by the multitude of options and that's why I'm asking for help.

I need to solve these equations analogously to Matlab-Simulink, i.e., a time interval and integration step, and a numerical procedure in symbolic versions.

Help_me.mw

## How to substitute into contravariant index...

Asked by:

How do you substitute into a contravariant index of a tensor say

T[~mu, nu]     ?

Nothing seems to work, I tried to subs(~mu=~1,T[~mu, nu]), subs(mu=1,T[~mu, nu]), and all permutations.

Substituting values into the covariant index works fine but not contravariant.

Surely it must be possible ?

## How to do SumOverRepeatedIndices...

Asked by:

restart:with(Physics):

Setup(dimension=3,coordinates=(X=[x,y,z])):

Define(Tp3[~alpha,~beta,~gamma],B[~lambda,mu],T3[~rho,~epsilon,~sigma]):

Tp3[~alpha,~beta,~gamma]=B[~alpa,rho]B[~beta,epsilon]B[~gamma,sigma]T3[~rho,~epsilon,~sigma]

SumOverRepeatedIndices of the expression does not do anything. Why?

Thanks for the answer.

## Simplify using trig identities...

Asked by:

What should I do to simplify eq13 further using trig sum identities?
Thank you for your help in advance,

 > restart;
 > phi := (x,n,L) -> sqrt(2/L)*sin(n*Pi*x/L + 1/2*n*Pi);
 (1)
 >
 > eq1 := W[n,m](q,p) = simplify(1/Pi*Int(phi(q+y,n,L)*exp(-2*I*p*y)*phi(q-y,m,L),y=-L/2+abs(q)..L/2-abs(q)));
 (2)
 > eq2 := simplify(convert(eq1,int)) assuming(n,integer,m,integer);
 (3)

Wigner function evaluated for q > 0 and q < 0, respectively

 > eq10 := simplify(eq2) assuming(q>0); eq11 := simplify(eq2) assuming(q<0); eq12 := simplify(eq10) assuming(m,integer,n,integer); eq13 := simplify(eq11) assuming(m,integer,n,integer);
 (4)

Download test5.mw

## how to determine lambda, m0, and n0?...

Asked by:

how to determine lambda, m0, and n0? a_i, and c_i are constants and c^2 = c[1]^2 + c[2]^2. solA.mw

 1 2 3 4 5 6 7 Last Page 1 of 38
﻿