/[escript]/trunk/downunder/test/python/ref_data/schlum.geo
ViewVC logotype

Contents of /trunk/downunder/test/python/ref_data/schlum.geo

Parent Directory Parent Directory | Revision Log Revision Log


Revision 5737 - (show annotations)
Mon Jul 13 04:51:55 2015 UTC (3 years, 10 months ago) by jduplessis
File size: 1853 byte(s)
updates of test to prepare for removal of dcresdomgen

1 lc=10.000000;
2 Point(1)={-200.000000, -200.000000, 0, lc};
3 Point(2)={200.000000, -200.000000, 0, lc};
4 Point(3)={200.000000, 200.000000, 0, lc};
5 Point(4)={-200.000000, 200.000000, 0, lc};
6 Line(1) = {1,2} ;
7 Line(2) = {3,2} ;
8 Line(3) = {3,4} ;
9 Line(4) = {4,1} ;
10 Line Loop(5) = {4,1,-2,3} ;
11 Plane Surface(6) = {5} ;
12 Point(5)={-27.500000,0.000000,0.000000,1.000000};
13 Point(6)={-22.500000,0.000000,0.000000,1.000000};
14 Point(7)={-17.500000,0.000000,0.000000,1.000000};
15 Point(8)={-12.500000,0.000000,0.000000,1.000000};
16 Point(9)={-7.500000,0.000000,0.000000,1.000000};
17 Point(10)={-2.500000,0.000000,0.000000,1.000000};
18 Point(11)={2.500000,0.000000,0.000000,1.000000};
19 Point(12)={7.500000,0.000000,0.000000,1.000000};
20 Point(13)={12.500000,0.000000,0.000000,1.000000};
21 Point(14)={17.500000,0.000000,0.000000,1.000000};
22 Point(15)={22.500000,0.000000,0.000000,1.000000};
23 Point(16)={27.500000,0.000000,0.000000,1.000000};
24 out0[]=Extrude {0, 0, -300.000000} { Surface {6};};
25 Point{5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16} In Surface{6};
26 Physical Volume("volume-1") = {1} ;
27 Physical Surface("Top") = { -6 };
28 Physical Surface("Bottom") = { -out0[0] };
29 Physical Surface("Left") = { -out0[2] };
30 Physical Surface("Right") = { -out0[4] };
31 Physical Surface("Front") = { -out0[5] };
32 Physical Surface("Back") = { -out0[3] };
33 Field[1] = Box;
34 Field[1].VIn=lc;
35 Field[1].VOut=5*lc;
36 Field[1].XMax=100.000000;
37 Field[1].XMin=-100.000000;
38 Field[1].YMax=100.000000;
39 Field[1].YMin=-100.000000;
40 Field[1].ZMax=0;
41 Field[1].ZMin=-200.000000;
42 Field[2] = Attractor;
43 Field[2].NodesList = {5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16};
44 Field[3] = Threshold;
45 Field[3].IField = 2;
46 Field[3].LcMin = lc / 5;
47 Field[3].LcMax = 100*lc;
48 Field[3].DistMin = 70;
49 Field[3].DistMax = 100;
50 Field[4] = Min;
51 Field[4].FieldsList = {1, 3};
52 Background Field = 4;
53 Mesh.CharacteristicLengthExtendFromBoundary = 0;

  ViewVC Help
Powered by ViewVC 1.1.26