Description

This function adds a new Hemisphere Surface type Element Primitive node and returns the node number of the added object.

Syntax

epNode = ElemAddHemisphereSurface( tEnt )

Parameters

epNode (Long)

Node number of the element primitive that was added.

tEnt As T_ENTITY

Data structure containing the generic entity information (name, parent, description, etc.) required to add a node to the object tree.

Example

The example below shows how to initialize a T_ENTITY structure, add a Hemisphere Surface type element primitive and then modify the element primitive parameters.

Sub Main

    'Initialize the generic element data

    Dim tEnt As T_ENTITY

    InitEntity( tEnt )

    tEnt.name   = "EP Hemisphere Surface"

    tEnt.parent = 2 'Geometry folder

    'Create the element primitive node

    Dim epNode As Long

    epNode = ElemAddHemisphereSurface( tEnt )

    'Modify the element primitive parameters

    ElemSetParmValue( epNode, 0, 5 ) 'Radius = 5

    'Update the model

    Update

End Sub

See Also

T_ENTITY

Element Primitive Script Commands

Element Composite (boolean) Script Commands