Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2012

[Date Index] [Thread Index] [Author Index]

Search the Archive

P controller

  • To: mathgroup at smc.vnet.net
  • Subject: [mg127059] P controller
  • From: Phoenix <mirko.tavano at live.com>
  • Date: Wed, 27 Jun 2012 04:11:31 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com

Hi there! I have to plot the following function but I can't and i don't know why!

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[0] == hss}, h, x]
  }

Plot[F[t], {t, 10, 20}]


It should be h=hss when t<10; h=E^(-0.2` x) (-2.115297927011188` + 4.230595854022376` E^(0.2` x))
when t>0.
I need them in the same graph.
Thanks!



  • Prev by Date: How to plot this function??
  • Next by Date: Re: Issue understanding the use of Cashflow
  • Previous by thread: Re: How to plot this function??
  • Next by thread: Approximate Zero Times A Symbol