Get Elements in Tcl Variable (Large no of elements > 6 Lakh)

Hi,

 

I am trying to get all elements of a component in a Tcl variable (Elements Count > 6 Lakh) and Hypermesh is taking too long (~ 1 hours) and ends with a not responding error message.

 

eg.      catch {unset all_component_elements};
            hm_markclearall 1;
            hm_markclearall 2;
            *rejectclear;
            *clearmark elems 1
            hm_markclear elems 1;
            *createmark elems 1 'by comp' $comp
            set all_component_elements [hm_getmark elems 1];

 

Is there any other method to retrieve these elements inside Tcl variables.

I need to use this logic inside Tcl Script/Macro.

 

Thanks in Advance, for help.

Regards

Piyush