AHSAN

65 Reputation

6 Badges

1 years, 315 days

MaplePrimes Activity


These are questions asked by AHSAN

Hello, Everyone. can anyone help me to find the solution of the transcendental equation by using the newton raphson method ( want to calculate the valve of lambda by putting p=0) by assuming the valve of k=0.1,beta=0.2 in the attached maple file?

help.mw

Hello to all, does anyone create an example for me that how to calculate and plot streamline of fluid flow.

Hello everyone, can anyone help me to solve this problem? noted I want to solve a couple of odes and need to find involved integration constant i.e c1 to c4. 
 

restart

diff(q(y), y, y)-A*q(y) = B*(P*y+c1)

diff(diff(q(y), y), y)-A*q(y) = B*(P*y+c1)

(1)

NULL

bc := q(-sigma) = 0, q(sigma) = 0

q(-sigma) = 0, q(sigma) = 0

(2)

(1+N)*(diff(u(y), y, y))+N*(diff(q(y), y)) = P

(1+N)*(diff(diff(u(y), y), y))+N*(diff(q(y), y)) = P

(3)

bc := u(-sigma) = 1, u(sigma) = -k

u(-sigma) = 1, u(sigma) = -k

(4)

``


 

Download help_couple_ode.mw

Hello everyone, pls help me to fix tolerance up to 10^-6 for the generated set of data points


 

restart

 

-(3/20)*(-6.003*(1+(1/2)*x^2)^3+15.400672*(1+(1/2)*x^2)^2-8.745236204-7.393580208*x^2)/(1+(1/2)*x^2)^4

(4)

data1 := [seq([lambda1(x), x], x = 0 .. .6, .1)]

[[-0.9786536940e-1, 0], [-0.9445602756e-1, .1], [-0.8473253146e-1, .2], [-0.7004169606e-1, .3], [-0.5215959008e-1, .4], [-0.3283205398e-1, .5], [-0.1345044656e-1, .6]]

(5)

``


 

Download data_points_beteen_x_and_lambda.mw

Hello everyone. does anyone please correct my worksheet? I
 

restart

E := 1/e^5

S := 1/e^5

f := proc (x) options operator, arrow; x^2-2 end proc

proc (x) options operator, arrow; x^2-2 end proc

(1)

a := 1

1

(2)

b := 2

2

(3)

"while b-a>=S or (abs(f(a))>=E and abs(abs(f(b))>=E)                                                                                       "

Error, unable to match delimiters

"while b-a>=S or (abs(f(a))>=E and abs(abs(f(b))>=E)"

 

"do"

Error, unable to parse

"do"

 

"if (f(x[a])-f(x[b])=0)"

Error, invalid 'if' statement

"if (f(x[a])-f(x[b])=0)"

 

print(Method*fail)

Method*fail

(4)

break

Error, break or next not in loop

 

"fi;"

Error, unable to parse

"fi;"

 

c := b-f(b)*(b-a)/(f(b)-f(a))

4/3

(5)

"if f(c)<E then"

Error, unterminated 'if' statement

"if f(c)<E then"

 

break

Error, break or next not in loop

 

"elif f(a) f(c)<0 then"

Error, unable to parse

"elif f(a) f(c)<0 then"

 

b := c

4/3

(6)

"else"

Error, unable to parse

"else"

 

a := c

4/3

(7)

"end if;"

Error, unable to parse

"end if;"

 

"end do;"

Error, unable to parse

"end do;"

 

[a, b]

[4/3, 4/3]

(8)

abs(f(a))

2/9

(9)

abs(f(b))

2/9

(10)

``


 

Download Method.mw

am trying to solve but could not get the required answer

First 7 8 9 10 Page 9 of 10