Advanced Search

Question: how to plot a graph using two parameters once

Question:how to plot a graph using two parameters once

shakuntala 25 Maple
parameters syntax differential-equation odeplot
July 13 2018
0

MHD_cchf_2.mw
 

NULL

NULL

> 

NULL
> 

NULL
> 

w := .572433:
> 

NULL
> 

for j to nops(N, m) do sol1 := dsolve([diff(diff(diff(f(eta), eta), eta), eta)+w*x(f(eta)*(diff(diff(f(eta), eta), eta))-(m[j]*m[j])*(diff(f(eta), eta))-(diff(f(eta), eta))^2) = 0, y*(diff(diff(theta(eta), eta), eta))/(pr*z)-b*f(eta)*(diff(f(eta), eta))*(diff(theta(eta), eta))-b*f(eta)^2*(diff(diff(theta(eta), eta), eta))+f(eta)*(diff(theta(eta), eta)) = 0, f(0) = N[j], (D(f))(0) = 1, (D(f))(20) = 0, theta(0) = 1, theta(20) = 0], numeric, method = bvp); plots[odeplot](sol1, [eta, ((D@@2)(f))(eta)], color = red); plots[odeplot](sol1, color = red); plots[odeplot](sol1, [eta, theta(eta)], color = K[j], linestyle = L[j]); fplt[j] := plots[odeplot](sol1, [eta, f(eta)], color = K[j], axes = boxed, linestyle = L[j]); tplt[j] := plots[odeplot](sol1, [[eta, theta(eta)]], color = K[j], axes = box, linestyle = L[j]) end do; plots:-display([seq(fplt[j], j = 1 .. nops(N, m))]); plots:-display([seq(tplt[j], j = 1 .. nops(N, m))])

Error, invalid input: nops expects 1 argument, but received 2

  

Error, invalid input: nops expects 1 argument, but received 2

  

Error, invalid input: nops expects 1 argument, but received 2

  
> 

``
> 

``


 

Download MHD_cchf_2.mw

 

Respected sir, I try to plot graphs using two parameters once. But it showing the error as

Error, invalid input: nops expects 1 argument, but received 2
Error, invalid input: nops expects 1 argument, but received 2
Error, invalid input: nops expects 1 argument, but received 2

can anybody do help in this regard?
Please Wait...