Unanswered Questions

This page lists MaplePrimes questions that have not yet received an answer

I have a proc as follows:

F:=proc(f,n)
L:=[f];
for j from 1 to n do;
J:=int(1/subs(t=x[j],L[j]),x[j]=2..x[j+1]);
L:=[op(L),J];
end do;
end proc;

I chose to use index variables. However when I try to apply a member of the output list as a function of the outermost limit, I do not get any output when I try to evaluate the function. I suspect maple is having trouble with the variables withing the integral. How can I make this work?

I'd like to have a function that I can evaluate:

g:=F(log(t),3)[3];
f:=unapply(g,x[3]);

f(2.1);

Thanks!

hi,

I am trying to plot the polygon but it isnt working. Please help

 

i put

triangle := polygonpolt3d ([13,11,12], [16,10,18], [14,10,7]) :

display3d (triangle)

I'm trying to solve a differential equation in Maple given by:

 when y(3) = -7.

 

I should get the result

but for some reason I get 

 

I solved it by writing:

 

I have Maple 18 if it makes a difference.

Dear all

I want your help in a problem.I want to substitute in a summarization ,the variables for Vi and ξi.Because the number of variables are more than 200 I want to know if there is a way to take them from the excel sheet and put the to my program.attached are the maple worksheet and the variables table

P.s. i have done it for 44 variables

My old disc with the maple version 17 worked perfect, but later the disc has colapsed. So I changed the disc and installed the programm. The installation and the activation were successfull. But the programm doesn't start more. Only the command-version in dow-window. What is wrong?

https://drive.google.com/file/d/0B2D69u2pweEvaUNnVWdXbm9WT3c/edit?usp=sharing

for base 10

1 op1 5 = 

        01

op1   12

_________

first digit of first number 1     = 1

first digit of second number 1 = 2

 then find 12 in logic table, it is 1, separation is 1 means move the value 1

to left 1 digit become 10

convert 10 back from base 3 to base 10, it is 3

how to construct this unknown name operator table with the custom logic table Min, Except, Diff

based on the operation described

 

no matter the logic table is correct or not, hope to mechanize these calculation steps for developing 3 operation table for base 10 quickly.

is it possible to develop a new kind of algebra with 3 new operators with the use of 3 operation table?

 

 

ex4_lista_CSTR.mw

Variáveis

 

``

restart;

F[A][0] := 43, 4;

43, 4

 

802, 8

 

0

 

71, 87

(1.1)

C[P][A] := 35;

35

 

18

 

46

 

19, 5

(1.2)

deltaC[P] := -C[P][A]-C[P][B]+C[P][C];

-7

(1.3)

V := 40, 1

40, 1

(1.4)

v[A][0] := 46, 62;

46, 62

 

46, 62

 

233, 1

(1.5)

v[0] := v[A][0]+v[M][0]+v[B][0];

325, 125

(1.6)

H[A][ref] := -66600;

-66600

 

-123000

 

-226000

(1.7)

deltaH[R][ref] := -H[A][ref]-H[B][ref]+H[C][ref];

-36400

(1.8)

deltaH[R] := deltaH[R][ref]+deltaC[P]*(T-T[ref]);

-36400-7*T+7*T[ref]

(1.9)

``

k := 16, 96*10^12*exp(-32400/(R_*T));

16, 96000000000000*exp(-32400/(R_*T))

(1.10)

R_ := 1, 987;

1, 987

(1.11)

C[A][0] := F[A][0]/v[0];

(43, 4)/(325, 125)

(1.12)

T[0] := 75;

75

(1.13)

T[ref] := 68;

68

(1.14)

 

Balanço Molar

 

r[A] := -k*C[A][0]*(1-X[MA](T));

-(16, 96000000000000*exp(-32400/((1, 987)*T)))*(43, 4)*(1-X[MA](T))/(325, 125)

(2.1)

``

EQ1 := X[MA](T) = V*k/(V*k+v[0]);

X[MA](T) = (40, 1)*(16, 96000000000000*exp(-32400/((1, 987)*T)))/((40, 1)*(16, 96000000000000*exp(-32400/((1, 987)*T)))+(325, 125))

(2.2)

``

Balanço de Energia

 

r[A] := -k*C[A][0]*(1-X[EA](T));

-(16, 96000000000000*exp(-32400/((1, 987)*T)))*(43, 4)*(1-X[EA](T))/(325, 125)

(3.1)

``

EQ2 := X[EA](T) = 1-(C[P][A]*F[A][0]+C[P][B]*F[B][0]+C[P][C]*F[C][0])*(T-T[0])/(deltaH[R]*V*k*C[A][0]);

X[EA](T) = 1-(15941, 284)*(T-75)*(325, 125)/((-35924-7*T)*(40, 1)*(16, 96000000000000*exp(-32400/((1, 987)*T)))*(43, 4))

(3.2)

``

``



Download ex4_lista_CSTR.mw

 

 

 

 

E     Average
number
Fermi-
Dirac
 0      1.8
 1      1.6
 2      1.2
 3      0.8
 4      0.4
 5      0.2
 6      0
 7      0
 8      0
 9      0

 

E=0   f(E)=1.8  = 1/A+1    A=-0.444    kt is unknown. Hence I try many numbers.

This is my code

plot(1/(-0.444*exp(x/3)+1),x=0..9);

 

I have a problem.  A is negative. The denominator would be zero.

This is the theory.

http://hyperphysics.phy-astr.gsu.edu/hbase/quantum/disfdx.html#c2

If I type in a function in 2D Math, the text disappears. for example, if I type fsolve(), until fsolve, the text appears, but after i type (, the whole text disappears. How should I solve this? Thanks.

I am running under Windows 7 and using the following command in a MAPLE .mw file to convert a group of .mw files to WWW format:

MapleWWWW:-Install("S:/MRBwork/Phd/SOFTWARE/MAPLE/R4&5/Conversions to MAPLE WWW/Input/","S:/MRBwork/Phd/SOFTWARE/MAPLE/R4&5/Conversions to MAPLE WWW/Output/","http://digi-area.com/light/MapleWWW/js/maple-www.js");
Error: FileTools:-Text:-ReadFile("file or directory does not exist: %1")
Error: FileTools:-Text:-ReadFile("file or directory does not exist: %1")

As you can see I am getting an error return. I believe I have placed the module in the right directory. As a test I ran the following:

FileTools[IsReadable]("S:/MRBwork/Phd/SOFTWARE/MAPLE/R4&5/Conversions to MAPLE WWW/Input/"); FileTools[IsReadable]("S:/MRBwork/Phd/SOFTWARE/MAPLE/R4&5/Conversions to MAPLE WWW/Output/");
true
true

So both folders are recognised by MAPLE.

Can anyone help debug this please?

MRB

Good day, can any one help in writing maple programme for the finite difference (FD) formulae define to solve this coupled non-linear  ODEs. See it here FDM_programme.mw Thank you

NOTE: please disregard the earlier link.

I am plotting a simple rational function. When the denominator is completely factored, the discont command works as expected. However, if the denominator is expanded, discont fails.

Why does this happen?

 

restart

(x-3)/((3*x+1)^2*(x-2)^3)

(x-3)/((3*x+1)^2*(x-2)^3)

(1)

plot((x-3)/((3*x+1)^2*(x-2)^3), x = -3 .. 3, y = -2 .. 2, discont = true)

 

normal((x-3)/((3*x+1)^2*(x-2)^3), expanded)

(x-3)/(9*x^5-48*x^4+73*x^3-6*x^2-36*x-8)

(2)

plot((x-3)/(9*x^5-48*x^4+73*x^3-6*x^2-36*x-8), x = -3 .. 3, y = -2 .. 2, discont = true)

 

``

This behavior also occurs in Maple 17.

Download discont.mw

I have seen no posting on the following issue: on a high density monitor, example QHD+, where the resolution is 3200x1800, the titlebar, the palettes and the graphs are so small that they are essentially invisible. In addition, the symbols in the palettes overextend the edge of the palette. I see this with both Dell computers and Apple computers that run Maple under Windows. Is true with other computers? Is Maplesoft aware of this issue? I'm assuming it has something to do with the Java graphics library. Is there a solution?

SmithChart.mw
 If I want to plot Smith Chart ,how do I mark a circle of arbitrary values?

then,How do I avoid the polar line to cover other  circle line?

Any body can give me some ideas or better ways to plot Smith Chart?

Thanks.

(Z0)   + I Ω    

(ZL) + I Ω

(ω) rad/s

α dB/m= Np/m

(β) rad/m

Zg

(l)

(z)  l

(Vg)

(u)

output:                                                                 

                

(Γ)                                 

(Γ)

            

 (SWR)  

 

(zL):

           

 (YL): S

  tanhγℓ

  tanβℓ

 (Zin):   Ω

  (zin):

    (γ):

(Vo)(z=0): V

      (Io)(z=0): A

Vo+):      V         

(Vo-):  V 

               (Vs): V

  (Is): A

             ):

  r=     ,   x=   Yo=

``
with(plots):

 

``

 

``

````

``

``

help("?")

NULL

``

NULL

``

NULL

``

NULL

``

NULL

``

NULL

``

NULL

``

NULL

``

NULL

``

NULL

``

NULL

``

NULL

``

NULL

``

NULL

``

NULL

``

NULL

``

NULL



Download SmithChart.mwSmithChart.mw

 

how to convert between (system of polynomials or module) and rational function which is a four dimensional space

First 252 253 254 255 256 257 258 Last Page 254 of 363