diff --git a/samples/tcl/snowflake.tcl b/samples/tcl/snowflake.tcl
index a99bff5984..bfafc0e6ca 100644
--- a/samples/tcl/snowflake.tcl
+++ b/samples/tcl/snowflake.tcl
@@ -86,7 +86,6 @@ bfuse w w w5
 shape wsh Sh
 foreach f [explode w f] {add $f wsh}
 renamevar wsh w
-save w w.brep
 unifysamedom r w
 
 # keep only wires in compound