# File:ZeroLengthContactNTS2D Example1.tcl