The batch input file

---

FEMGEN SPEC1

GEOMETRY POINT COORD P1 0

GEOMETRY POINT COORD P2 100

CONSTRUCT SHAPE CYLINDER CYL1 P1 P2 15

CONSTRUCT SHAPE PLANE PLX40 X 40

CONSTRUCT SHAPE PLANE PLZ0 Z 0

CONSTRUCT SHAPE PLANE PLX70 X 70

GEOMETRY POINT COORD P3 40 35

GEOMETRY POINT COORD P4 40 35 10

CONSTRUCT SHAPE CYLINDER CYLTOP P3 P4 30

GEOMETRY POINT COORD P5 40 -35

GEOMETRY POINT COORD P6 40 -35 10

CONSTRUCT SHAPE CYLINDER CYLBOT P5 P6 30

EYE DIRECTION 1 1 1

EYE FRAME ALL

VIEW GEOMETRY +ALL

VIEW SHAPE +CYL1 YELLOW

VIEW SHAPE +PLZ0 VIOLET

VIEW SHAPE +CYLTOP BLUE

VIEW SHAPE +CYLBOT RED

VIEW SHAPE +PLX40 WHITE

VIEW SHAPE +PLX70 WHITE

VIEW GEOMETRY +ALL

GEOMETRY SURFACE INTERSECT S1 CYL1 PLZ0 -CYLTOP -CYLBOT +PLX40 -PLX70

VIEW GEOMETRY +ALL

LABEL GEOMETRY SURFACES

GEOMETRY SURFACE INTERSECT S3 CYLTOP +CYL1 +PLX40 PLZ0

GEOMETRY SURFACE INTERSECT S5 CYLBOT +CYL1 +PLX40 PLZ0

VIEW GEOMETRY +ALL

VIEW GEOMETRY ALL

LABEL GEOMETRY LINES

CONSTRUCT SET OPEN END

CONSTRUCT SET APPEND L9 L10

CONSTRUCT SET CLOSE

GEOMETRY SURFACE REGION S7 END

MESHING DIVISION L3 408

MESHING DIVISION L4 -408

MESHING DIVISION L5 408

MESHING DIVISION L6 -408

MESHING DIVISION L9 8

MESHING DIVISION L10 8

DRAWING DISPLAY

GEOMETRY POINT COORD PM1 100

GEOMETRY POINT COORD PM2 -100

CONSTRUCT TRANSFRM MIRROR TR1 PM1 PM2

CONSTRUCT SET OPEN END1

CONSTRUCT SET APPEND SURFACES ALL

CONSTRUCT SET CLOSE

GEOMETRY COPY END1 END2 TR1

VIEW GEOMETRY ALL

EYE DIRECTION 1 1 1

LABEL GEOMETRY LINES

CONSTRUCT SET OPEN END3

CONSTRUCT SET APPEND L7 L8 L11 L12 L15 L14

CONSTRUCT SET CLOSE

UTILITY MEASURE DISTANCE P13 P23

GEOMETRY SWEEP END3 SE6 TRANSLATE TR2 -80

EYE FRAME ALL

LABEL GEOMETRY OFF

EYE FRAME

MESHING SHAPE S15 CYL1

MESHING SHAPE S16 CYL1

MESHING OPTIONS ALGORITHM DELAUNAY ALL

MESHING DIVISION ELSIZE ALL 4

MESHING GENERATE

* W0135: 1100 new nodes and 2196 new elements generated

EYE DIRECTION 1 1 1

EYE FRAME ALL

VIEW MESH

VIEW HIDDEN SHADE WHITE

VIEW HIDDEN OFF

VIEW GEOMETRY ALL

CONSTRUCT SET OPEN OUTER

CONSTRUCT SET APPEND SURFACES ALL

CONSTRUCT SET CLOSE

GEOMETRY BODY GENERAL B1 OUTER

* W0133:Mesh cancelled above NN= 0 and NE= 0

VIEW GEOMETRY B1

MESHING GENERATE B1

* 2196 faces and 1100 corner nodes on the skin of B1

* 9707 tet elements created on B1

* W0135: 2206 new nodes and 9707 new elements generated

VIEW MESH

UTILITY TABULATE GEOMETRY B1

VIEW GEOMETRY B1

EYE DIRECTION 0 0 1

LABEL GEOMETRY OFF

LABEL GEOMETRY SURFACES

DRAWING DISPLAY

VIEW GEOMETRY B1

LABEL GEOMETRY SURFACES

PROPERTY MATERIAL MAT STEEL 2.07E+011 0.29 7860 0 0

PROPERTY LOADS FORCE LO1 1 S7 20 X

DRAWING DISPLAY

PROPERTY ATTACH ALL STEEL

PROPERTY BOUNDARY CONSTRAINT CO1 S14 123

LABEL MESH LOADS ALL

LABEL MESH CONSTRNT ALL

LABEL GEOMETRY MATERIALS

---