Lines Matching refs:eval_arg
69 proc eval_arg {argument libdict} { procedure
141 set x1 [scaleval [eval_arg [lindex $arguments 0] $libdict]]
142 set y1 [scaleval [eval_arg [lindex $arguments 1] $libdict]]
143 set x2 [scaleval [eval_arg [lindex $arguments 2] $libdict]]
144 set y2 [scaleval [eval_arg [lindex $arguments 3] $libdict]]
151 set pinx [scaleval [eval_arg [lindex $arguments 1] $libdict]]
152 set piny [scaleval [eval_arg [lindex $arguments 2] $libdict]]
158 set x1 [scaleval [eval_arg [lindex $arguments 0] $libdict]]
159 set y1 [scaleval [eval_arg [lindex $arguments 1] $libdict]]
160 set x2 [scaleval [eval_arg [lindex $arguments 2] $libdict]]
161 set y2 [scaleval [eval_arg [lindex $arguments 3] $libdict]]
166 set x1 [eval_arg [lindex $arguments 0] $libdict]
167 set y1 [eval_arg [lindex $arguments 1] $libdict]
168 set x2 [eval_arg [lindex $arguments 2] $libdict]
169 set y2 [eval_arg [lindex $arguments 3] $libdict]
170 set cx [eval_arg [lindex $arguments 4] $libdict]
171 set cy [eval_arg [lindex $arguments 5] $libdict]
184 set x1 [scaleval [eval_arg [lindex $arguments 0] $libdict]]
185 set y1 [scaleval [eval_arg [lindex $arguments 1] $libdict]]
186 set r [scaleval [eval_arg [lindex $arguments 2] $libdict]]