Lines Matching refs:x2
37 set x2 [expr $width - 30]38 if {$x2 < 21} {39 set x2 2141 $w coords poly 20 15 20 35 $x2 35 $x2 45 $width 25 $x2 5 $x2 15 20 1542 $w coords line 20 15 20 35 $x2 35 $x2 45 $width 25 $x2 5 $x2 15 20 15