​​CylindricalShell=ImplicitRegion[700<=128.026x^2+93.42z^2<=950&&-3<=y<=3,{x,y,z}]​​mirror=Translate[Region[CylindricalShell,Axes->True,FaceGrids->All],{-0.4,0,-0.1}]​​​​​​​​elephant=Import["C:\\Users\\Admin\\Downloads\\elefante.obj","GraphicsComplex"];​​grid=Graphics3D[elephant,Axes->True,FaceGrids->All]​​elephantmeshpoints=MeshRegion[elephant]​​(*Graphics3D[GeometricTransformation[elephantmeshpoints,ReflectionTransformat]*)​​elephantvector=[{Arrow[{{-0.4,0,-0.1},elephantmeshpoints}]}]​​vector=Graphics3D[{Arrow[{{0,0,0},{1.5,0,0}}],Axes->True,FaceGrids->All}];​​(*WorkingOnthePartwhere:theelephantisturned"inside out"andthesurfaceoftheelephantiscurvedaroundtheinteriorsurfaceofthemirror*)​​​​elephantinmirror=Show[mirror,grid]​​SetSystemOptions["LibraryLinkOptions"->"TestFloatingPointExceptions"->False];
Out[]=
ImplicitRegion[700≤128.026
2
x
+93.42
2
z
≤950&&-3≤y≤3,{x,y,z}]
Out[]=
LibraryFunction
:Numeric data containing a floating point exception (NaN or Inf) encountered.
Out[]=
Out[]=
MeshRegion[GraphicsComplex[{{-1.33322,-3.03453,-2.85896},{-1.34649,-3.03913,-2.81161},{-1.36684,-3.03115,-2.84219},{-1.35079,-3.02592,-2.88853},{-1.30119,-3.03784,-2.8752},
⋯38666⋯
,{-1.40768,-2.54772,-2.4832},{-1.39559,-2.53607,-2.46836},{-1.39559,-2.53607,-2.46836},{-1.38975,-2.5113,-2.47973}},
⋯1⋯
,{
⋯1⋯
}]]
large output
show less
show more
show all
set size limit...