User Portlet
| Discussions |
|---|
| In[1]:= Z[?_] := 1/(\[ImaginaryJ]*?*c); H[?_] := Z[?]/(r + Z[?]); c = 1*^-6; r = 1000; Reduce[Abs[H[2 ?*f]] == 1/Sqrt[2] && f > 0, f] Out[4]= f == 500/?if you want the result in terms of radians instead of a decimal approximation, just... |