LS-DYNA单元见嵌入cohesive element

本人用LS-DYAN做碰撞仿真，现需要在实体单元（六面体单元）之间嵌入cohesive element，我现在的想法就是先将整个PART的单元都离散了，然后在把相邻两个单元重合的那个单元表面上的八个节点（两个面，每个有四个节点）组合成一个单元，定义为零厚度的cohesive单元，这个应该是可以实现的，就是需要编一个小程序对K文件进行操作，无奈现在还没学过编程，我想应该有人实现过吧，可不可以共享一下这个小程序，或者有偿分享也行，谢谢了啊