185 Reputation

5 Badges

3 years, 206 days

MaplePrimes Activity

These are questions asked by jrive

How can I get Maple to simplify expressions into more meaningful forms?

For example, 

xc1 := -(2*Q*R1 + sqrt(4*Q^2*R1*RL - R1^2 + 2*R1*RL - RL^2))*R1/(4*Q^2*R1 + R1 - RL)


The numerator, under the radical, is more meaningful as sqrt(4 Q^2 R1 RL-(R1-RL)^2).


Similarly, the denominator can be simplified to Rs(4 Q^2+1)-RL.  


How do I get Maple to get me there?

I have Maple solve a system of equations.  I then want to assign the result to the different variables for use later in the worksheet.  How do I do this?


{C1 = .6666666670*Ceq, C2 = 2.000000002*Ceq, L1 = 0.1377592863e-15/Ceq, R1 = 0.8802817643e-8/Ceq}


c1 := sol3[1]

C1 = .6666666670*Ceq


l1 := sol3[2]

C2 = 2.000000002*Ceq


r1 := sol3[3]

L1 = 0.1377592863e-15/Ceq


Solutions, C2=10pf

Ceqsol := 20*e-12



C1sol := subs(Ceq = Ceqsol, c1)

C1 = 13.33333334*e-8.000000004




First, all I want to do is assign the solution value for C1 to C1.  Not being able to do this, I try to assign C1 to "different" variable c1, but the assignment is C1~=.66667* Ceq, instead of just the value of C1.  Later, I then try to substitute the value of Ceq, to get the solution for c1, and instead of just getting the value, I get  that C1= 13.33x10^-8 is assigned to C1sol, again instead of just the value, 13.33x10^-8.  How do I just assign the values to these variables instead of the expressions?


Thank you.

Download new_filter_solution.mw

How do I get Maple to simplify:


Io := I Cp Vin L1/(M sqrt(Cp L1))


to :  I sqrt(L1 CP) Vin/ M  ?


Furthermore, if  w = 1/sqrt(L1 *CP),  how do I get Maple to display the solution or the simplification as:

I*Vin/(w M) ?

I've t ried multiple substitutions and simplifications to no avail.


Thank you.





simplify(I*Cp*RL*Vin*L1/(M*(L1*Cp)^(1/2)), 'symbolic')





Io := Vores/RL






simplify(I*Cp*Vin*L1/(M*(L1*Cp)^(1/2)), 'assume = real')



combine(Vores/RL, power)






combine(I*Cp*Vin*L1/(M*(L1*Cp)^(1/2)), radical)






simplify(cancel(I*Cp*Vin*L1/(M*(L1*Cp)^(1/2))), 'assume = real')



simplify(I*Cp*Vin*L1/(M*(L1*Cp)^(1/2)), 'radical')



simplify(I*Cp*Vin*L1/(M*(L1*Cp)^(1/2)), 'symbolic')





Download Resonant_xformer.mw


Hello, I'm new to Maple, transitioning over from Mathematica.  I have a system of equations I'm trying to solve, but am trying to substitute values for some of the variables.  I don't think I'm doing it right, because I don't see the value in place of the variable when it echos the expression. Here are my equations, and how I'm trying to solve them:

wres := sqrt(C1+C2)/sqrt)C1*C2*L1)

vores := -C1/C2*vin

z3 = (C1^2 *R1- j*sqrt(C1*C2*L1*(C1+C2)))/C2^2

sys :={wres=13.56e6*2*pi, C1=C2, z3=40,abs(vores/vin)>=1}

solve(sys, {C1, C2, L1, R1})


(I apologize; I coulnd't figure out how to enter the Maple code here, directly).


When I try this, solve returns nothing.  I then try forcing R1 to be 2000, for ex.  I tried modifying sys to be


sys:={wres=13.56e6*2*pi, C1=C2, R1=2000,  z3=40,abs(vores/vin)>=1}, but this does't work.

then I tried, R1:=2000, exepcting to see R1 substituted with 2000 in the echo from sys, but it stills shows R1....


How do I do this?  

Also, how do I go about investigating why solve is having trouble solving a system of equations?



1 2 3 4 5 6 Page 6 of 6