Advanced Search

Question: plotting help required!

Question:plotting help required!

J4James 355
plot
May 13 2014
0

restart:

FF := Q-1+(1/5)*K*dp^3*h^5+(1/3)*dp*h^3+h+h1*h;

DDP:=[solve(FF,dp)]:

h:=1+phi*cos(2*Pi*x):

h1:=2*Pi*alpha*beta*phi*cos(2*Pi*x);

beta:=1:alpha:=0:
phi:=0.5:

dpdx:=evalf(DDP[1]):

dpp:=Int((dpdx),x=0..1):

plot([subs(K=-0.1,Re(evalf(dpp)))],Q=-1..1,axes=box,color=[blue],adaptive= false);

I am unable to get any type of output. 

Cheers!

 

 
Please Wait...