TCL Equivalence and Free Edge not working

Hello,

I try to remove free edges and equivalence with the following code.

I have no error with this code, but when I try to merge mesh with the GUI, HM found nodes and edges.

Consequently, it seems that code is not working.

Does somebody has an idea how to make this code working ?

 

*createmark elements 1 'by config' 103 4; # M3D3
*equivalence elements 1 0.01 1 0 0
*createmark elements 1 'by config' 103 4; # M3D3
*findedges elements 1 0
*deleteedges 
 

Thanks in advance