*rbe3updatedofs
Updates the degree of freedom codes for the specified independent node indices and the dependent node for an RBE3 element. This command requires node indices (usually 0-3) as input, not node IDs.
Syntax
*rbe3updatedofs element changed_dofs nrows ncols ddof
Type
HyperMesh Tcl Modify
Description
Updates the degree of freedom codes for the specified independent node indices and the dependent node for an RBE3 element. This command requires node indices (usually 0-3) as input, not node IDs.
Inputs
- element
- The ID of the RBE3 element to update.
- changed_dofs
- The ID of a 2 dimensional array. Each row contains the index to the ID of an independent node of the RBE3 element and the degree of freedomcode for which that node is active (any of the digits 1-6).
- nrows
- The number of rows in the changed_dofs array.
- ncols
- The number of columns in the changed_dofsarray (must always be 2).
- ddof
- The degree of freedom code for which the dependent node of the element is active (any of the digits 1-6).
Example
The following lines update the DOFs of independent nodes 100, 101, and 102 to 12345 and the DOF of the dependent node to 123 of an RBE3 element with ID 18.
First, determine the indices of the independent nodes in the rbe3 element:
set inodes [ hm_entityinfo "inode" ELEMENTS 18 ];
set num_nodes [ llength $inodes ];
set node_idx_to_update "";
set i 0;
while { $i < $num_nodes } {
set node_id [ lindex $inodes $i ];
switch -- $node_id {
100 { set idx_100 $i; }
101 { set idx_101 $i; }
102 { set idx_102 $i; }
}
incr i;
}
Now update the dofs:
*createintarray2d(3,2) $idx_100 12345 $idx_101 12345 $idx_102 12345
*rbe3updatedofs(18,1,3,2,123)
A *createintarray2d() command is required to define the pairing of
independent node index and new degree of freedom code for that node.
Note: This is designed
to work efficiently from within a process automation script (Tcl).
Errors
None.