*laminatecreate
Creates a laminate entity.
Syntax
*laminatecreate name color stack_convention repeat_number laminate_config list_id interface_plies rows cols system_id
Type
HyperMesh Tcl Modify
Description
Creates a laminate entity.
Inputs
- name
- The name of the laminate.
- color
- The color of the laminate. Valid values are 1-64.
- stack_convention
- The laminate stack convention. Valid values are:
- 0 - Total
- 1 - Membrane
- 2 - Bending
- 3 - Smear
- 4 - Smear core
- 5 - Symmetric
- 6 - Symmetric membrane
- 7 - Symmetric bending
- 8 - Symmetric smear
- repeat_number
- Currently not used. Set to 0.
- laminate_config
- The laminate configuration. Valid values are:
- 0 - ply laminate
- 1 - sublaminate laminate
- 2 - sublaminate
- list_id
- The ID of the list containing plies or laminates (for laminate_config=2) that define the laminate stacking sequence.
- interface_plies
- The 2D entity array that contains interface plies which define the laminate ply interfaces, created using *createentityarray2d. Must be set to 1. Only used for laminate_config=1.
- rows
- The number of rows in the interface_plies array. Only used for laminate_config=1.
- cols
- The number of columns in the interface_plies array. Must be set to 2. Only used for laminate_config=1.
- system_id
- The ID of the system assigned to the laminate. 0 indicates the global system.
Examples
To create one total and one symmetric ply laminate (laminate_config = 0) from plies 1 and 2:
*createlist plies 1 1 2
*laminatecreate lam1 3 0 0 0 1 0 0 0
*laminatecreate lam2 3 1 0 0 1 0 0 0
*clearlist plies 1
To create one total and one symmetric sublaminate (laminate_config = 2) from plies 1 and 2:
*createlist plies 1 1 2
*laminatecreate lam3 3 0 0 2 1 0 0 0
*laminatecreate lam4 3 1 0 2 1 0 0 0
*clearlist plies 1
To create a sublaminate laminate (laminate_config = 1) from sublaminates 3 and 4 with interface plies 1 and 2:
*createlist laminates 1 3 4
*createentityarray2d 1 2 1 2
*laminatecreate lam5 3 0 0 1 1 1 1 2 0
*clearlist laminates 1
Errors
Incorrect usage results in a Tcl error. To
detect errors, you can use the catch
command:
if { [ catch {command_name...} ] } {
# Handle error
}
Version History
11.0