X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?p=CreaPhase.git;a=blobdiff_plain;f=octave_packages%2Fsecs2d-0.0.8%2FUtilities%2FUmshcreatemesh.m;fp=octave_packages%2Fsecs2d-0.0.8%2FUtilities%2FUmshcreatemesh.m;h=a00986a044097feda9adae5c1c64afc57d08d68f;hp=0000000000000000000000000000000000000000;hb=c880e8788dfc484bf23ce13fa2787f2c6bca4863;hpb=1705066eceaaea976f010f669ce8e972f3734b05

diff --git a/octave_packages/secs2d-0.0.8/Utilities/Umshcreatemesh.m b/octave_packages/secs2d-0.0.8/Utilities/Umshcreatemesh.m
new file mode 100644
index 0000000..a00986a
--- /dev/null
+++ b/octave_packages/secs2d-0.0.8/Utilities/Umshcreatemesh.m
@@ -0,0 +1,17 @@
+function omesh=Umshcreatemesh(geometry,scalefactor,refine);
+
+##
+##
+## omesh=Umshcreatemesh(geometry,scalefactor);
+##
+##
+
+if nargin==2
+  refine =1;
+end
+
+system(["gmsh -format msh1 -2 -scale " num2str(scalefactor) " -clscale ",...
+	num2str(refine) " " geometry ".geo"]);
+
+omesh= Umsh2pdetool(geometry);
+omesh = Umeshproperties(omesh);