*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.