edited tags

Link

edited Mar 8, 2019 at 6:05

Tweeted twitter.com/StackMma/status/1103671654343999490

occurred Mar 7, 2019 at 15:00

Became Hot Network Question

occurred Mar 7, 2019 at 14:12

added 1 character in body

Source Link

edited Mar 7, 2019 at 11:10

As a simple example for applying stl-files I took "cow" out of MMA example data. I'm able to discretize the Graphic without problems

kuh = ExampleData[{"Geometry3D", "Cow"}]
mesh=DiscretizeGraphics[kuh,MeshCellStyle -> {{1, All} -> Red}] (* MeshRegion *)

to get an stl-like triangle surface, which seems to be ok

ConstantRegionQ[mesh]
(*True*)

for further meshing, but my attempt to create a volumemesh fails

Needs["NDSolve`FEM`"]
ToElementMesh[RegionBoundary[mesh]ToElementMesh[RegionBoundary[mesh]]
(*$Failed*)

What's wrong with my attempt? Thanks!

As a simple example for applying stl-files I took "cow" out of MMA example data. I'm able to discretize the Graphic without problems

kuh = ExampleData[{"Geometry3D", "Cow"}]
mesh=DiscretizeGraphics[kuh,MeshCellStyle -> {{1, All} -> Red}] (* MeshRegion *)

to get an stl-like triangle surface, which seems to be ok

ConstantRegionQ[mesh]
(*True*)

for further meshing, but my attempt to create a volumemesh fails

Needs["NDSolve`FEM`"]
ToElementMesh[RegionBoundary[mesh]
(*$Failed*)

What's wrong with my attempt? Thanks!

As a simple example for applying stl-files I took "cow" out of MMA example data. I'm able to discretize the Graphic without problems

kuh = ExampleData[{"Geometry3D", "Cow"}]
mesh=DiscretizeGraphics[kuh,MeshCellStyle -> {{1, All} -> Red}] (* MeshRegion *)

to get an stl-like triangle surface, which seems to be ok

ConstantRegionQ[mesh]
(*True*)

for further meshing, but my attempt to create a volumemesh fails

Needs["NDSolve`FEM`"]
ToElementMesh[RegionBoundary[mesh]]
(*$Failed*)

What's wrong with my attempt? Thanks!

Source Link

asked Mar 7, 2019 at 10:53

Meshing the cow

As a simple example for applying stl-files I took "cow" out of MMA example data. I'm able to discretize the Graphic without problems

kuh = ExampleData[{"Geometry3D", "Cow"}]
mesh=DiscretizeGraphics[kuh,MeshCellStyle -> {{1, All} -> Red}] (* MeshRegion *)

to get an stl-like triangle surface, which seems to be ok

ConstantRegionQ[mesh]
(*True*)

for further meshing, but my attempt to create a volumemesh fails

Needs["NDSolve`FEM`"]
ToElementMesh[RegionBoundary[mesh]
(*$Failed*)

What's wrong with my attempt? Thanks!

mesh

Return to Question