../../src/clip.tcl