Visualizepressuredistribution:
In[]:=
Show[bmesh["Wireframe"],SliceContourPlot3D[pressure[3.65,x,y,z],{x,y,z}∈mesh,Sequence[ColorFunction"TemperatureMap",ContoursApply[Range,Flatten[{minmaxPressure,(-Apply[Subtract,minmaxPressure])/3.65}]]]],ImageSizeMedium]
Out[]=
Drawstreamlinesinathree-dimensionalvectorfield:
In[]:=
Show[bmesh["Wireframe"],StreamPlot3D[{xVel[3.65,x,y,z],yVel[3.65,x,y,z],zVel[3.65,x,y,z]},{x,y,z}∈mesh],StreamMarkers"Arrow",StreamPointsFine,MeshNone,StreamColorFunction"DarkRainbow"]
Out[]=
Visualizethevectorfieldofvelocity：
In[]:=
Show[bmesh["Wireframe"],VectorPlot3D[{xVel[3.65,x,y,z],yVel[3.65,x,y,z],zVel[3.65,x,y,z]},{x,y,z}∈mesh,MeshNone]]
Out[]=
Curl'sstreamlinediagramofthree-dimensionalvectors:
In[]:=
Show[bmesh["Wireframe"],StreamPlot3D[Evaluate[Curl[{xVel[3.65,x,y,z],yVel[3.65,x,y,z],zVel[3.65,x,y,z]},{x,y,z}]],{x,y,z}∈mesh]]
Out[]=
Curl'svectordiagramofthree-dimensionalvectors:
In[]:=
Show[bmesh["Wireframe"],VectorPlot3D[Evaluate[Curl[{xVel[3.65,x,y,z],yVel[3.65,x,y,z],zVel[3.65,x,y,z]},{x,y,z}]],{x,y,z}∈mesh]]
Out[]=