Advanced Search

pik1432

245 Reputation

6 Badges

6 years, 122 days
Contact pik1432

MaplePrimes Activity


These are replies submitted by pik1432

Thank you, but it did not work....

pik1432 245
August 10 2020
0 0

@Preben Alsholm : thank you for your answer, but when it was tried, Maple gave another complaint. Here is the worksheet. 


 

> 

restart;
> 

with(LinearAlgebra):
> 

TrainLoad := -10*10^6*(cos(convert(40*degrees, radians))+I*sin(convert(40*degrees, radians)));

-10000000*cos((2/9)*Pi)-(10000000*I)*sin((2/9)*Pi)

 (1)
> 

 

> 

evalf(TrainLoad, 7);

-7660444.-6427876.*I

 (2)
> 

f1n2 := (0.03 + I*0.1515)*Ix[c1] - (0.03 + I*0.1515)*Ix[c2] + 2 * V[at1] - 55*10^3 = 0;

(0.3e-1+.1515*I)*Ix[c1]+(-0.3e-1-.1515*I)*Ix[c2]+2*V[at1]-55000 = 0

 (3)
> 

f3n4 := (1.6 + I*6.24)*Ix[c1] + (1.12 + I*2.64)*Ix[c2] + V[t] - V[at1] = 0;

(1.6+6.24*I)*Ix[c1]+(1.12+2.64*I)*Ix[c2]+V[t]-V[at1] = 0

 (4)
> 

f5n6 := (1.36 + I*4.44)*Ix[c2] + V[at2] - V[t] = 0;

(1.36+4.44*I)*Ix[c2]+V[at2]-V[t] = 0

 (5)
> 

f7n8 := (-1.12 - I*2.64)*Ix[c1] + (-3.92 - I*12.00)*Ix[c2] + V[at2] - V[at1] = 0;

(-1.12-2.64*I)*Ix[c1]+(-3.92-12.00*I)*Ix[c2]+V[at2]-V[at1] = 0

 (6)
> 

f9n10 := V[t] * conjugate(Ix[c1] - Ix[c2]) + TrainLoad = 0;

V[t]*conjugate(Ix[c1]-Ix[c2])-10000000*cos((2/9)*Pi)-(10000000*I)*sin((2/9)*Pi) = 0

 (7)
> 

polynomials := {f1n2, f3n4, f5n6, f7n8, f9n10};

{(1.36+4.44*I)*Ix[c2]+V[at2]-V[t] = 0, V[t]*conjugate(Ix[c1]-Ix[c2])-10000000*cos((2/9)*Pi)-(10000000*I)*sin((2/9)*Pi) = 0, (-1.12-2.64*I)*Ix[c1]+(-3.92-12.00*I)*Ix[c2]+V[at2]-V[at1] = 0, (0.3e-1+.1515*I)*Ix[c1]+(-0.3e-1-.1515*I)*Ix[c2]+2*V[at1]-55000 = 0, (1.6+6.24*I)*Ix[c1]+(1.12+2.64*I)*Ix[c2]+V[t]-V[at1] = 0}

 (8)
> 

variables := {Ix[c1], Ix[c2], V[at1], V[at2], V[t]};

{Ix[c1], Ix[c2], V[at1], V[at2], V[t]}

 (9)
> 

solve(polynomials, variables);

Warning, solutions may have been lost

  
> 

 

> 

 


 

Download conjugate_sol_PrebenAlsholm.mw

Thank you!...

pik1432 245
July 27 2020
0 0

@Carl Love : Thank you for the answer. The command 'fnormal' after 'simplify(..., zero)'did what I expected:

Thank you for the clear answer....

pik1432 245
July 27 2020
0 0

@nm : The following was what I was able to get, after following your answer:

Thank you!

Thank you for all the answers!...

pik1432 245
July 11 2020
0 0

@Carl Love Your answers are highly appreciated. 

Thank you for showing the alternative wa...

pik1432 245
July 02 2020
0 0

@Scot Gould 

Thank you!...

pik1432 245
July 01 2020
0 0

@Carl Love : Then, I got it working and was able to see the final number. 

Thank you for the clear answer....

pik1432 245
July 01 2020
0 0

@rlopez : I was able to move one more step forward!

Thank you for the amazing answers!...

pik1432 245
June 26 2020
0 0

@acer : Your points are absolutely true! Thank you for the extra information regarding the difference between 'simplify()' and 'is()' as well. 

Re: Additional question...

pik1432 245
June 26 2020
0 0

@Kitonum : would you allow me to ask this following up question?


 

> 

restart;
> 

Is_eq := I[mu]/sqrt((omega__r^2 + omega__rK^2)*sigma^2/(sigma^2*omega__rK^2 + omega__r^2));

I[mu]/((omega__r^2+omega__rK^2)*sigma^2/(sigma^2*omega__rK^2+omega__r^2))^(1/2)

 (1)
> 

Is_eq2 := I[mu] * sqrt((1+(omega__r/(sigma * omega__rK))^2)/(1+(omega__r/(omega__rK))^2));

I[mu]*((1+omega__r^2/(sigma^2*omega__rK^2))/(1+omega__r^2/omega__rK^2))^(1/2)

 (2)
> 

simplify(Is_eq - Is_eq2);

-I[mu]*(((omega__r^2+omega__rK^2)*sigma^2/(sigma^2*omega__rK^2+omega__r^2))^(1/2)*((sigma^2*omega__rK^2+omega__r^2)/(sigma^2*(omega__r^2+omega__rK^2)))^(1/2)-1)/((omega__r^2+omega__rK^2)*sigma^2/(sigma^2*omega__rK^2+omega__r^2))^(1/2)

 (3)
> 

is(Is_eq = Is_eq2);

false

 (4)
> 

 


As far as I can see, two expressions, 'Is_eq' and 'Is_eq2' are the same, but Maple seems to think differently. 

I would appreciate if you can offer any clue regarding why Maple thinks in a different way. 

Download Qkitonum_20200626.mw

Thank you for the streightforward answer...

pik1432 245
June 22 2020
0 0

@Kitonum Perhaps, I put too much emphasis on the aesthetics of expression. 

Thank you for showing the deeper side of...

pik1432 245
June 22 2020
0 0

@acer Freeze/Thaw command set would be useful!

Thank you!...

pik1432 245
June 21 2020
0 0

@acer Thank you for the answer. That would be the way to differentiate the variable s from the literal 's'. 

 

Thank you for the clear answer!...

pik1432 245
June 18 2020
0 0

@acer : The second part of your worksheet is what I tried and asked for. Thank you!

Details...

pik1432 245
June 11 2020
0 0

@Carl Love Your step by step explanation is appreciated. I'm still on a learning curve regarding how to use Maple, thus any detailed explanation like yours becomes a meaningful help. 

Thank you for the clear answer....

pik1432 245
June 10 2020
0 0

@panke: It looks more intuitive!

5 6 7 8 Page 7 of 8