I can't figure out how to constrain a solution I'm getting from Mathematica into a more specific solution I'm seeking. There's a variable I want to eliminate from the solution, but my attempts haven't succeeded.
Mathematica confirms that the equation is true when answer == -1/(4p):
In[114]:= myTransformParameterized[p] ==
factor myFunction[answer, s ] /. {answer -> -1/(4 p)}
Out[114]= True
But when I try to obtain this solution automatically, I can't quite get it:
In[115]:= PowerExpand[
FullSimplify[
Solve[
myTransformParameterized[p] == factor myFunction[answer, s],
answer
],
s \[Element] Reals && p > 0 && answer \[Element] Reals
]
]
Out[115]= {{answer ->
ConditionalExpression[(-(s^2/(4 p)) + 2 \[Pi] C[1])/s^2,
C[1] \[Element] Integers]}}
There's an s in the automatic solution, and I'd like to eliminate it, but I don't know how.
I'm attaching a Notebook that completely demonstrates my issue.
Thanks.
Attachments: