1 /*--------------------------------*- C++ -*----------------------------------*\
3 | \\ / F ield | foam-extend: Open Source CFD |
4 | \\ / O peration | Version: 3.2 |
5 | \\ / A nd | Web: http://www.foam-extend.org |
6 | \\/ M anipulation | |
7 \*---------------------------------------------------------------------------*/
13 location "constant/polyMesh";
16 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
19 // Plane strain 2-D model of simple DCB
20 // two beams adhered together
21 // thickness of each beam can be set
22 // or the material of each beam could be set using setFields
25 changecom(//)changequote([,])
26 define(calc, [esyscmd(perl -e 'printf ($1)')])
28 //define(vlabel, [[// ]Vertex $1 = VCOUNT define($1, VCOUNT)define([VCOUNT], incr(VCOUNT))])
30 // define geometry in mm
31 define(bl, 60) // beams length
32 define(bh, 10) // individual beam height
33 define(pn, 10) // pre-notch length
34 define(z, 1) // out of plane thickness
36 // define mesh density
37 define(meshPn, 10) // number of cells in beam length direction before notch
38 define(meshBl, 60) // number of cells in beam length direction after notch
39 define(meshBh, 10) // number of cells in beam height direction
41 // start of blockMeshDict
43 convertToMeters 0.001;
74 // hex (0 1 8 9 10 11 18 19) sheet (meshPn meshBh 1) simpleGrading (1 1 1)
75 // hex (1 2 3 8 11 12 13 18) sheet (meshBl meshBh 1) simpleGrading (1 1 1)
76 // hex (7 8 5 6 17 18 15 16) sheet (meshPn meshBh 1) simpleGrading (1 1 1)
77 // hex (8 3 4 5 18 13 14 15) sheet (meshBl meshBh 1) simpleGrading (1 1 1)
78 hex (0 1 8 9 10 11 18 19) (meshPn meshBh 1) simpleGrading (1 1 1)
79 hex (1 2 3 8 11 12 13 18) (meshBl meshBh 1) simpleGrading (1 1 1)
80 hex (7 8 5 6 17 18 15 16) (meshPn meshBh 1) simpleGrading (1 1 1)
81 hex (8 3 4 5 18 13 14 15) (meshBl meshBh 1) simpleGrading (1 1 1)
138 // ************************************************************************* //