User Portlet User Portlet

Discussions
Greetings and Salutations, The problem I'm having with Mathematica 11 on a Mac Sierra is when trying to combine attached M1 surface plot with M2 curve plot - as in M3 - it runs ad infinitum. Problem seems to be the two parameters for the M1 Shroud...
Consider the following code: UnitSimplify[ Quantity[Quantity[1.3040420058965703`*^-40, ( "ReducedPlanckConstant" "Seconds")/("Meters")^5]/Sqrt[ WolframAlphaResult[ ...
RegionPlot3D[Abs[Sin[z]] r, {r, 0, Sqrt[Cos[2 \[Theta]]]}, {\[Theta], 0, \[Pi]/4}, {z, 0, 2 \[Pi]}, PlotRange -> Automatic] Trying to plot this returns error: ""Limiting value Sqrt[Cos[2\\[Theta]]] in {r,0,Sqrt[Cos[2\\[Theta]]]} \is not a...