Filling a Manipulate Plot

Question

I am attempting to fill the part of the graph when the orange line is within the blue line. I am unable to make the fill work when the lines are under manipulation. Ultimately I would like there to be a fill between the orange line and the blue line when the orange line is crossing through the blue's area. Here is what I have so far:

Manipulate[
 Show[Plot[-3.56 + 2.222 y - .22 y^2, {y, 0, 10}, 
   PlotRange -> {{0, 10}, {0, 5}}, 
   AxesLabel -> {"Home Goods", "Health Care"}, Ticks -> None, 
   PlotLabel -> "Proper Healthcare PPF", PlotStyle -> {Thick, Blue}],
  Plot[1/(.05 \[Sqrt]x) - c, {x, 0, 10}, 
   PlotRange -> {{0, 10}, {0, 3}}, PlotStyle -> {Thick, Orange}, 
   Ticks -> {{{c, "U"}}, {{0, "Healthcare Choice"}}}]], {{c, 5.8, 
   "Use of Resources"}, 5.8, 6.93}]

Answer 1

Manipulate[
 Plot[
      {-3.56 + 2.222 y - .22 y^2, 1/(.05 \[Sqrt]y) - c}, {y, 0, 10},
      PlotRange -> {{0, 10}, {0, 5}}, PlotStyle -> {Blue, Orange}, 
      Filling -> {1 -> {{2}, {None, Yellow}}}], 
 {{c, 5.8, "Use of Resources"}, 5.8, 6.93}]