Delete redundant lines

[xuantientutungXUK6E]

hi guys,

i have a input dwg which have some redundant lines like in attached dwg.

the work i usually do is trimming the excess line.

i try to make a lisp that can automated trimming excess line.

thank for any suggestion.

[doglips]

Try picking the MODIFY menu item and then Delete Duplicate Objects