[Gmsh] RE Generating geometry with a function in Gmsh

[jean pierre aubry]

what about this

cl0=0.1;
D=5;
s0=-1;
L=50;
x0=0;



Function S
	S=D/2*(1-s0*(1+Cos(2*Pi*(x-x0)/L)));
	z=S;
Return

step=10;
lstep=L/2/step;

For i In {0:step}
	x=i*lstep;
	Call S;
	Point(100+i) = {x, 0, z, cl0};
EndFor

For i In {0:step-1}
	Line(100+i) = {100+i, 100+i+1};
EndFor


Extrude {{1, 0, 0}, {0, 0, 0}, Pi/2} {
  Line{100:109};
}

as a skeleton


-- 
jean pierre aubry
33 688 670 795
jeanpierre [at] lamachine.fr