I have a simple question that is related to the way to extact and use the values i obtain to plot!

I have a variable A and depending the value the following reduce operation returns 1 or 2 values.

` A = 0.5; Reduce[ {D[-A Cos[\[Theta]] + 0.5 Sin[\[Theta]]^2 - 0.01 Cos[\[Theta]], {\[Theta], 1}] == 0, D[- A Cos[\[Theta]] + 0.5 Sin[\[Theta]]^2 - 0.01 Cos[\[Theta]], {\[Theta], 2}] > 0, 2 Pi >= \[Theta] > 0}, \[Theta], Reals] A = 2; Reduce[ {D[-A Cos[\[Theta]] + 0.5 Sin[\[Theta]]^2 - 0.01 Cos[\[Theta]], {\[Theta], 1}] == 0, D[- A Cos[\[Theta]] + 0.5 Sin[\[Theta]]^2 - 0.01 Cos[\[Theta]], {\[Theta], 2}] > 0, 2 Pi >= \[Theta] > 0}, \[Theta], Reals] `

RETURNS:

`\[Theta] == 3.14159 || \[Theta] == 6.28319 \[Theta] == 6.28319 `

If i want to plot the result of the reduce operation as function of A, how can i extract the values?

`Plot[ Reduce[ {D[-A Cos[\[Theta]] + 0.5 Sin[\[Theta]]^2 - 0.01 Cos[\[Theta]], {\[Theta], 1}] == 0, D[- A Cos[\[Theta]] + 0.5 Sin[\[Theta]]^2 - 0.01 Cos[\[Theta]], {\[Theta], 2}] > 0, 2 Pi >= \[Theta] > 0}, \[Theta], Reals][[2]], {A,-20,20}] `

If i use the [[2]] it only will plot the values obtained when there is only one solution. how can i plot all the solutions? 1 when there is only 1 and 2 when there are 2 solutions?

Thanks in advance