Lines Matching refs:expr
22 expr srand(0)
43 set txt "[number_name [expr {$n/1000}]] thousand"
44 set n [expr {$n%1000}]
49 append txt " [lindex $::ones [expr {$n/100}]] hundred"
50 set n [expr {$n%100}]
53 append txt " [lindex $::tens [expr {$n/10}]]"
54 set n [expr {$n%10}]
86 set r [expr {int(rand()*500000)}]
97 set r [expr {int(rand()*500000)}]
111 set lwr [expr {$i*100}]
112 set upr [expr {($i+10)*100}]
115 speed_trial speed2-select1a [expr {50*50000}] row $sql
125 speed_trial speed2-select2a [expr {50*50000}] row $sql
135 set lwr [expr {$i*100}]
136 set upr [expr {($i+10)*100}]
139 speed_trial speed2-select1b [expr {50*50000}] row $sql
149 speed_trial speed2-select2b [expr {50*50000}] row $sql
166 set lwr [expr {$i*100}]
167 set upr [expr {($i+10)*100}]
176 set id [expr {int(rand()*50000)+1}]
185 set id [expr {int(rand()*50000)+1}]
207 set lwr [expr {$i*100}]
208 set upr [expr {($i+10)*100}]
217 set id [expr {int(rand()*50000)+1}]
226 set id [expr {int(rand()*50000)+1}]
243 set lwr [expr {$i*2}]
244 set upr [expr {($i+1)*2}]
255 set r [expr {int(rand()*500000)}]
273 set r [expr {int(rand()*500000)}]