volcano.geo 363 Bytes
Newer Older
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
L = 12000;
lc = 1000;
Point(1) = {-L/2,-L/2,0,lc}; 
Point(2) = {-L/2,L/2,0,lc}; 
Point(3) = {L/2+L,L/2,0,lc}; 
Point(4) = {L/2+L,-L/2,0,lc}; 

Line(1) = {1,2};
Line(2) = {2,3};
Line(3) = {3,4};
Line(4) = {4,1};

Line Loop(1) = {1,2,3,4};
Plane Surface(1) = {1};

Physical Line("Wall") = {1,2,4};
Physical Line("OpenSea") = {3};

Physical Surface("Domain") = {1};