*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