| Author |
Comment/Response |
MT
|
 06/25/12 5:32pm
Hi there, I have problem with plotting this function:
Clear["Global`*"]
Fi = .1;
do = .18;
Ao = Pi*do^2/4;
Cd = .61;
g = 9.81;
A = 5;
hss = (Fi/(Ao*Cd))^2*(1/(2*9.81))
F[t_] := {
If[t < 10, hSP = hss, hSP = 2*hss];
DSolve[{h'[x] == (hSP - h[x])/A, h[10] == hss}, h, x];
}
Plot[F[t] /. %, {t, 0, 20}]
Could you help me?
URL: , |
|
